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GRAFIX80F/T. 
COMPATIVEL ATE COM 
SEU PAPEL DE CARTA. 
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A GRAFIX 80 F/T 6 vere^tiL Com 
ela vocS pode facilmente irnprimir 
formularies contfnuos e folhas 
soltas como papeis de carta, 
envelopes, etiquetas, etc. Isto 
porque a GRAFIX 80 F/T e a unica 
que vem equipada com trator e 
com cifindro de borracha, igual aos 
das maquinas de esc never, 
permitindo a impressSo da primetra 



a ultima tin ha. 
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silenciosa. Imprime em 80 colunas 
a 160 caracteres por segundo com 
baixo nJvel de rufdo, 

A (em de tudo isso, a GRAFIX 80 
F/T 6 compatfvel com todos os 
micfocomputadores, especialmente 
com os compatfvets IBM-PC, 
imprimindo todos os softwares 
disponfveis ID base III, Lotus 1-2-3, 
Word, ABC, Chartstar etc.) 

ConhecaaGRAFIX80F/T. 
A impressora certa pars seu 
micro pessoal ou profissionak 



A GRAFIX 80 F/T e rapida e 




Al. Amazonas. 832 - Alphaville 
Borueri-SP Tal. 421-1247 




GRAFIX. TECNOLOGIA SEMPRE EM EVOLUQAO. 




esta edicao de MS voce~ tera" opor- 
tunidade nao sd de digitar pro gra- 
mas educativos. mas tamb4m de 

se inteirar sobre como as escolas brasileiras 

tSm utilizado os micros. 

Mesmo em sociedades mais experientes 
com este tipo de apHcacao — como os 
EUA, aonde o numero de computadores 
em sala de aula chega perto de 1 milhSo, 
segundo a revista TIME — as duvidas nao 
desapareceram. Quanto ao uso dado aos 
micros pelos coligios, ja se tentou de tudo: 
micialmente o quente era utilizar a maquina 
para monitorar exercfcios priticos; depot's 
o principal esforco passou a ser ensinar 
programacao, em especial BASIC e LOGO, 
e atualmente a maioria das escolas none- 
americanas prefere treinar os alunos na ope- 
racSo de pacotes, como os edit ores de texto. 

Seja qua/ for a utilizacao, no entanto, 
existem dois problemas graves que hoje 
preocupam os educadores: a elitizacao cres- 
cente do ensino e a falta de software de qua- 
Iklade para a criacao de padrdes de uso. 

No caso do Brasil, que ja possui desigual- 
dades estruturais fortes, nao ha" muito como 
evitar a criacao de mais uma elite. Apesar 
dos esforcos do governo em minim izar o 
problema, atravis do projeto EDUCOM 
(freqiientemente ameacado por falta de 
verbasl, 6 inegivel que a rede privada est£ 
mi/hOes de anos a" frente das escolas publi- 
cas. 

J4 o problema da producao de software 
educacional de bom nivel parece estar me- 
Ihorando. Os fabricantes t§m incentivado 
esta Area e o que at6 aqui era producao 
amadora, geralmente um professor- usu&rio 
ou usudrio- professor desenvolvendo em pe- 
quena escala, por encomenda de uma esco- 
la, vai ganhando perspectivas comerciais. 

Na hora de desenvolver, a solucao 6 
fugir do bloco do "eu sozinho", pois ji 6 
consenso que a producao de programas edu- 
cacionais, para ser viivel, tern que ser um 
trabalho de equipe, que conte com a parti- 
cipacSo de tecnicos e mestres. E na hora de 
comprar, 6 preciso criar criterios de avalia- 
cSo precisos, que passam por aspectos como 
objetivo; pedagogia; documentacao e estru- 
tura da programacao em si. A final, expor 
sistematicamente o aluno a programas erro- 
neamente concebidos pode levar a resulta- 
dos desastrosos. 
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O sorteado deste mes, que recebera uma 
assinatura anual da revista MICRO 
SISTEMAS, e Jossy Coser Dorneles, de 
Porto Alegre - RS. 



DIALETOS BASIC 



Venho atraves desta esclarecer e reforpar 
alguns pontos sobre o artigo Dialetos BASIC, 
da autoria de Maria Sylvia Marques Abaurre, 
publicada em MS n? 46. 

1 — Para poupar o trabalho dos "Traduto- 
res", quanto ao posicionamento de tela do 
TRS-80, a tabela da pagina 27 pode ser 
substitui'da pela fbrmula: 

PRINTS L'64+C 
onde L e igual a linha, e C e igual a colu- 
na. 

2 — Na tabela de comandos da pagina 28, o 
comando USR(N) chama uma sub-rotina em 
Assembler, s6 que N nao 6 o endereco da 
sub-rotina. Este endereco deve ser dado atra- 
ves de POKEs (em BASIC Residente) ou da 
instrucao DEFUSRn = N, onde n 6 o nume- 
ro da sub-rotina e N, o seu endereco. 

3 - Existe o comando EDIT no TRS-80 (na 
tabela desta mesma pagina consta que nao). 
4-0 comando GET so existe em BASIC 
Disco e e usado para trazer do disco um re- 
gistro de arquivo randomico. A sua utiliza- 
cao, da maneira como foi descrita na referi- 
da tabela, acarretara erro. Sua sintaxe e: 

GET n,N 
onde n e o numero do arquivo e N, o nu- 
mero do registro. O GET da tabela trata-se 
do INKEY$ no TRS-80. 
5-0 comando INPUT # existe no TRS, e 
sua utilizacao e sintaxe e a mesma do IN- 
PUT # do Color, sendo que, se o numero do 
arquivo for negativo, e sinal que o referido 
arquivo esta" em cassete. 
6 — comando HIMEM:X, do Apple, pode 
ser sintetizado transformando-se X em LSB- 
MSBedando POKE 16561, LSB:POKE 16562. 
MSB. O comando LOJvlEM nao existe nem 
pode ser sintetizado. 

7—0 comando PRINT AT que consta na 
tabela esta diferente do que consta no tex- 
to. O texto est£ certo e nao a tabela. 
8 — Nos equipamentos TRS ha uma diferen- 
ca entre RANDOM e RND(N) (ou RAND 
(N), no Sinclair). Existem os dois comandos, 
so que RANDOM aciona um gerador de nu- 
meros aleat6rios, e RND(N) gera um nume- 
ro aleatbrio inteiro nao maior que N. 
Fernando Leal de Menezes 
Sao Paulo - SP 

Prezado Fernando, sua carta foi remetida 
a autora, que enviou esta resposta: 

"Inicialmente quero agradecer sua carta 
que veio me alertar acerca de alguns enga- 
nos comet idos na confeccao final da tabela. 
Sao eles: 

1 — Na linha da instrucao GET houve erro, e 
o GET A$ do Apple foi repetido para o 
TRS-80. O correto para este computador 6 
INKEY$:A$=INKEY$, prova disso S a 
traducao do comando IN KEYS do TRS-80 
que aparece na tabela como GET AS. . . para 
o 64/20; 

2 — Apds a impressao da tabela notei o erro 
relativo a instrucao INPUT #, que realmen- 
te existe para o TRS-80, e sua sintaxe S IN- 
PUT # -1.X.Y (IS uma linha de dados em 
fita cassete). Seu "oposto" PRINT #-1,X,Y 
esta" corretamente mencionado na tabela; 



3 - O PRINT AT X,Y da tabela devera ser 
substituido por PRINT. . . (leia artigo); 

4 — Houve uma inversao quanto ao posicio- 
namento do comando EDIT A ou E A na ta- 
bela, que aparece creditado aos computado- 
res Apple (que nao possuem o referido ro- 
mando), mas pertence a coluna dos compu- 
tadores TRS-80; 

5—0 RAND a que me refiro na tabela 6 a 
instrucao BASIC RANDOMIZE (reinicializa- 
dora da funcao RND). Sua traducao correta 
para o TRS-80 6 RAN DON (sem o N que a 
tabela apresenta). Na coluna Significado, 
onde se IS: gera numeros aleatdrios a partir 
de N, deve-se ler: inicia uma nova sSrie de 
numeros aleatdrios a partir de N. 

Fernando, quanto a sua observacao n? 3, 
o N sd signifies endereco de sub-rotina para 
o comando CAL L (N) dos Apple. Suas duas 
outras observacdes, tanto sobre o posiciona- 
mento da tela no TRS-80 quanto a possivel 
traducao do comando HIMEM.X do Apple, 
vSm enriquecer a tabela e mostrar quanto S 
import ante a troca de opinides entre progra- 
madores de diferentes "sintaxes". " 
Maria Sylvia Abaurre 
Vitdria - ES 



MSAGRADECE 



Quando adquiri a MS de setembro tive 
uma agradavel surpresa, pois vi uma reporta- 
gem completa e muito esclarecedora aos 
usuarios compatt'veis com o TRS-Color. Tra- 
ta-se da materia Video no Color, de Claudio 
Costa. Desde que comprei meu CP 400 Co- 
lor, nao havia encontrado qualquer publica- 
pao que o abordasse de forma tao completa 
como na edicao n? 48 de MS. 
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/ CORRESPONDENCIAS / 

O Club do TK90X deseja trocar progra- 
mas e ideias sobre este equipamento. As car- 
tas devem ser enviadas para a Av. Diogui- 
nho, 1990/302, Praia do Futuro, CEP 60.000. 
Edgy Eduardo En6as de Arruda Paiva 
Fortaleza — CE 

Sou professor de programacao BASIC e 
estou, juntamente com alguns amigos, que- 
rendo formar um clube do micro, p6rem, 
nao contamos com nenhuma experiencia no 
assunto. Gostan'amos de receber informa- 
coes de clubes formados (ou em formacao): 
como funcionam; os estatutos; como entrar 
de socio; enfim, id£ias de companheiros afic- 
cionados em informatica. O endereco para 
correspondencia e: Av. Anhanguera, 1814, 
VI. Nova, CEP 74000. 
Belchior Rezende 
Goiania — GO 



Envie sua correspondencia para: 
ATI - Analise, Teleprocessamento e 
Informatica Editora Ltda., Av. Presidente 
Wilson, 165/gr. 1210, Centro, Rio de 
Janeiro/RJ, CEP 20030, SepSo 
Cartas/RedapSo MICRO SISTEMAS. 
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Ler Micro Sistemas e um dos 
melhores programas que 
voce pode fazer em materia 
de Informatica. Mas progra- 
ma bom mesmo voce vai fa- 
zer nesse TK-90X que a Micro 
Sistemas vai Ihe dar de presen- 
ts E que presente! Sao 2 com- 
putadores por mes (assim, suas 
chances de ganhar serao em dobro), duran- 
te os meses ae outubro,novembro e dezembro. 
E se depois dessa voce nao fizer um progra- 
mao, nao importa. Nas paginas de Micro Sis- 
temas voce sempre encontra um sob medida 
para as suas necessidades. 




VEJA COMO E FACIL GANHAR 

Para ganhar um TK-90X e muito sim- 
ples. Basta voce assinar, por um ano, a 
revista Micro Sistemas e responder a 
consulta no pe do cupom. ATENCAO: 
renovacao de assinatura tambem vale 
para a promocao. 

No mes de Janeiro terd um quarto 
sorteio para os que nao foram con- 
templados em OUT/NOV/DEZ. 



TK-90X E O MAIS RECENTE LANCAMENTO DA MICRO DIGITAL ELETRON ICA LTDA. 
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Preencho um cheque nominal a ATI Editora Lfda e envie para: 
Rio de Janeiro: Av. Presidente Wilson. 165/gr. 1210- CEP 20030 
Centro -RJ- Tel. (021) 262-6306 



Sao Paulo: Rua Oliveira Dias, 153 - Jardim Paulista - 01433 
Sao Paulo (SP) - Tel. (Oil) 853-7758 



Qual o tema que voce prefere ver nas paginas de sua MS? 



O desenvolvimento de software educativo exige criatividade e 
algumas tecnicas adequadas. Se voce tem um micro da linha TRS-80 
e deseja ingressar nesta area, este artigo podera ajuda-lo. 




Ensinando 



o micro a ensinar 



Heber Jorge da Silva 



Sem diivida, uma questao bastante polemica nos dias 
de hoje 6 a da crescente utiliza^ao do microcomputa- 
dor nas escolas como instrumento auxiliar de ensino. 
Existe a corrente dos que acham que tal pratica e pre- 
judicial, sob a alegacao de que ela inibe a capacidade de racio- 
cinio das criancas. Realmente, ficamos preocupados quando 
vemos, por exemplo, as criancas abandonarem o estudo da ta- 
buada e ficarem totalmente dependentes de uma calculadora 
para saberem quanto sao 7x6. Acontece que, todos nos sabe- 
mos, o tempo do "de cor e salteado" ja passou e o microcom- 
putador esta ai mesmo surgindo como uma especie de exten- 
sao da professora, quando utilizado de forma inteligente e ade- 
quadamente. 

As crian9as sao fascinadas pelo video. Quern duvidar disso 
e so fazer uma visitinha de observacao a uma dessas lojas de vi- 
deogames, para se convencer do contrario e descobrir, talvez, 
que este fasci'nio nao e um privilegio so das crian9as... Surge 
entfo a questao: por que nao aproveitar uma coisa que tanto 
prende a atencao das criancas para fazer com que elas apren- 
dam sem sentir que estao aprendendo, ou ainda fazer com que 
aprendam se divertindo? 

Para voce que acredita no potencial do micro no auxflio a 
educa93o e deseja escrever programas educativos, aqui vao 
algumas dicas que poderao ser aproveitadas como tempero dos 
seus programas, tornando o aprendizado mais facil e eficiente. 

£ bom ter em mente que, sempre que puder, a crianca vai 
tentar dar um jeitinho de acertar sempre. Uma boa medida 
para se evitar isso e a desativa9ao da tecla BREAK ou a inibi- 
9§o do comando LIST do programa. Qualquer uma delas difi- 
cultara o acesso e altera9ao das variaveis do programa. Para de- 
sativar a tecla BREAK, coloque no inicio do seu programa a 
instru9ao: POKE 16396,1 75 :POKE 16397, 201 e para reativa- 
lo use: POKE 16396, 201 . comando LIST do programa pode 
ser inibido com: POKE 16863,1 95 iPOKE 16864, 114POKE 
16865,0 e restabelecido atraves de: POKE 16863, 201 :POKE 
16864, 191 :POKE 16865, 147. 

A fun9ao RND deve ter uso constante em seu programa. As 
questoes que obedecem a uma regra logica sao captadas pela 
crian9a, que passa a acertar as respostas sem fazer uso do racio- 
cinio. Um exemplo ti'pico sao as questOes de tabuada, onde as 



Listagem 1 



10 REM tt EXEMPLO 1 

20 REM It DEMONSTRACAO DE ENTRADA DE NUMEROS GRAF I COS 

30 CLEORIOOO 

40 DEFSTRAiDIM A( 10) i A1-CHR» <24) i AB-STR ING« (2, Al )*CHR«<26) I A2-CH 

R« ( 1 49 ) i A3-CHR* ( 1 B3 ) I A4-CHR* < 1 33 ) I A5-CHR* ( 1 4 1 ) i A6-CHR» < 1 40 ) i A7-C 

HR*<128) iAC-CHR«<27> 

SO A I 1) =-CHR* ( 131 )»A2-AB-A5*«« 

60 A12I -CHfc» ( 170) ♦A7*AB»CHR« ( 1 3B > »A7 

70 AC3>-CHRaU79)*A2*AB*A5+CHRa«132> 

80 A14)-CHR*U79>*A2*AB*A6*A4 

90 A(S)-CHR»<1B1)-*A2*AB*A7*A4 

1 00 A ( 6 ) «A3*CMR« (143) *AB* A6* A4 

110 A<7)"A3+CHR«(143)*AB*A5*A4 

120 A(8)-CHR«(lfc3)*A4*AB*CHR«(138)*A7 

130 A(9)-A3*A2*AB+A5*A4 

140 A(IO) »A3*A2+AB*A6*A4 

ISO CL8iD-OiPRINT"D>glt» nuwoi ..." 

160 A-INKEY«iIF A--" THEN 160 ELSE IF ASC<A)>37 THEN 160 

170 PRINT A(VAL(A)*l)|AC|tD-D*l 

1.80 IF D<32 THEN 160ELSE ISO 



respostas tern uma seqiiencia facilmente descoberta. 

Um recurso imprescindi'vel na elabora9ao de programas edu- 
cativos e a utiliza9§o da capacidade grafica do seu micro. Com 
este recurso, voce pode associar figuras as questSes propostas, 
bem como criar efeitos especiais que tornem as suas telas mais 
atrativas e agradaveis. Por exemplo, com a combina9ao de di- 
ve rsos codigos de caracteres graficos do seu microcomputador, 
voce pode formar um conjunto de niimeros ou letras que pro- 
porcionarao efeitos bastante interessantes, que nao seriam con- 
seguidos com o conjunto de caracteres normais fornecidos pelo 
gerador de caracteres da maquina. A listagem 1 e uma demons- 
trate da cria9ao e aplica9§o de um conjunto de caracteres re- 
presentando os digitos de a 9, com altura igual a duas linhas 
de vi'deo. Este conjunto pode ser muito util na proposi9ao de 
questOes de matematica, com um efeito visual muito bom, e 
que voce poderf facilmente adaptar e usar em seu programa: a 
linha 30 reserva espa90 para o armazenamento das strings; nas 
linhas de 40 a 140 sao criados os digitos de a 9, utilizando-se 
os cddigos de caracteres graTicos do micro, e armazenando-os 
em um arranjo string A S ( ). As linhas de 1 50 a 1 80 demons- 
tram uma das maneiras de se passar para o video os digitos gra- 
ficos criados, atraves de uma rotina INKEYS onde os digitos 
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captados pela rotina sao utilizados como subscri9ao do arranjo 
de variaveis string. Um outro modo de se mostrar os graficos 
criados para o video se aplica no caso de se ter um numero ar- 
mazenado em uma varMvel qualquer. Para ver como funciona, 
substitua as linhas de 1 50 a 1 80-nas listagens 1 ou 2 por: 



no m«.k:o«<stmiii»i.. , i. «» l»l to LniHti 
I'd mm k<vikt.<NiD(iH(.i.iii>iiiM-i 



Na listagem 2, voce tem um outro conjunto de caracteres 
graficos, tambem representando os digitos de a 9, agora com 
altura de tres linhas de video. Arme-se de uma boa dose de pa- 
ciencia, pegue uma folha de lay-out de video do seu micro e 
comece a trabalhar; fa9a o mesmo com as letras do alfabeto e 
os demais caracteres. 

Outro exemplo da utiliza9ao dos recursos graficos do seu 
micro para enriquecer a apresenta9ao dos seus programas e a 
caretinha triste ou alegre para condenar ou comemorar os erros 
e acertos obtidos. £ espantoso como uma coisa tao simples 
pode exercer um efeito psicologico tao forte sobre as crian9as! 
Elas passam a se esfor9ar o maximo para nao verem aquela ca- 
rinha triste. Na listagem 3, voce vera como construir e utilizar 
essas caretinhas, uma de cada vez. 

Utilizando a rotina da listagem 4, voce tera um efeito tam- 
bem bastante interessante. Assim que captar uma resposta erra- 
da da crian9a, chame esta rotina em linguagem de maquina de 
dentro de um loop, e voce tera a impressao de clarOes de ex- 
plosSes, prococados pela inversao de todos os caracteres grafi- 
cos e espa90S existentcs na drea de vi'deo, ficando intactos os 
demais caracteres. Todos os artifi'cios utilizados sao validos, 
desde que a crian9a veja imediatamente os efeitos e resultados 
dos seus erros e acertos. 



Listagem 2 



10 REM *« EXEMPLO 2 

20 REM (* DEMONSTRACAO DE ENTRADA DE NUMEROS GRAFICOS 

30 CLEAR lOOO 

40 DEFSTRAiDIM A< 10) i A1.-CHR«<24) I A2-CHR»< 128) i AB-STRING* (4. Al ) i A 

3»CHR»<26) 

SO AU>«CHR«< 184)*CHR«( 135)*CHR«( 139)*CHR» ( 180) *AB*A3*CHR« < 191 )♦ 

A2*A2*CHR« (191) ♦AB*A3*CHR« ( 1 39 ) *CHR» ( 1 80 ) +CHR» < 1 84 ) * CHK» ( 1 33 > 

60 A (2) -CHR»( 160) +CHR* ( 190>*CHR» ( 149) ♦A2*AB*A3*A2*CHR» ( 1 70) *CHR» 

(149>»A2*AB*A3*CHR*(160)»CHRS( 186)*CHR«< 181 > *CHR« ( 144) 

70 A(3)-CHR»(190)*CHR»< 131)*CHR»( 131 ) ♦CHR» ( 189) *AB*A3+A2*CHR» ( 16 

O) *CHR» ( 1 38 ) *CHR» ( 1 29 ) ♦AB*A3*CHR» ( 1 84 > *CHR» ( 1 83 ) *CHR» (176) *CHR» < 

176) 

80 A(4)-CHR«(190)*CHR«<131)*CHR«(131)*CHR»(189>*AB*A3*A2*CHR«(13 

6)<-CHR*( 174)+CHR«(14S)+AB*A3*CHR»( 1 75 ) +CHR« ( 1 76 ) *CHR» ( 176) *CHR« ( 

139) 

90 A(3)-A2+CHR«(160)-k:hR«< 190) *CHR«( 149) »AB*A3-K:hR»< 184)*CHR*(18 

3) *CHR« (186) *CHR« ( 181 > ♦AB*A3*A2+A2+CHR» ( 186) *CHR« ( 181 ) 

1O0 A(6)-CHR«( 191>+CHRS(131)*CHR»( 1 31 ) *CHR« ( 131 ) ♦AB*A3*CHR» ( 131) 

♦CHR»( 131 )*CHR«(131 )+CHR»(189)+AB+A3*CHR»(173)+CHR»( 176)*CHR»( 17 

6)+CHR«(lS9) 

110 A (7) -CHR« (190) +CHR« (131) *CHR» ( 131 ) +CHR«( 189) ♦AB*A3*CHR«( 191 ) 

♦CHR« (140>+CHR»< 140)*CHR»( 1BO) *AB*A3*CHR« ( 1 75) *CHR» ( 1 76) *CHR» ( 1 7 

6>*CHR«(1S9> 

120 A(8)-CHR»(143)*CHR«( 131 ) *CHR« ( 163)*CHR»( 139) ♦AB*A3»A2*CHR» ( 1 

68 ) *CHR« (151) ♦ A2*AB*A3*A2*CHR» < 1 9 1 ) +A2*A2 

130 A<9)-CHR»( 190)*CHR«( 131 )*CHR«(131 l*CHR»( 189) *AB*A3*CHR« ( 187) 

♦CHR«< 140)*CHR«( 140)*CHR»( 183) ♦AB+A3*CHR» ( 175) *CHR« ( 176) -»CHR» ( 17 

6)*CHR«(139) 

140 A(10)-CHR»( 190)-»CHR»( 131 )*CHR»(131 ) *CHR« < 189) ♦AB*A3*CHR» ( 139 

)*CHR»( !•'.' ■') ••:.><<■■* : 140)+CHR»(191 > ♦AB»A3*CHR» ( 1 75 ) *CHR» ( 1 76 ) *CHR» ( I 

76) *CHR» ( 139) i AC-CHR* (32) +CHR« (27) *CHR« (27) 

130 CLSiD»OiPRINT"Digi te nuwroi ..." 

160 A-INKEY«:IF A-"- THEN 160 ELSE IF ASC(A)>37 THEN 160 

170 PRINT A(VAL(A)*l)|ACllD-D*l 

180 IF D<12 THEN 160 ELSE ISO 



A possibilidade de se obter som no micro atraves da porta 
do cassete e um outro recurso muito valioso na concep9ao de 
programas educativos. Para melhor avaliar a importancia do 
som, experimente come9ar a jogar um game sonoro qualquer e, 
apos alguns minutos, desUgar os plugs do som. Voce sentira 
subitamente que o jogo perdeu muito do seu atrativo e bem 
depressa voce perderd o estimulo de continuar jogando. mes- 
mo acontece com os programas educativos: o som, da mesma 
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ENSINANDO O MICRO A ENSINAR 



TABELA DE ESCALAS 


1" ESCALA 


2* ESCALA 


3» ESCALA 


NOTA 


NUMERO 


NOTA 


NUMERO 


NOTA 


NUMERO 


Rfil 

mi' 

PA. 

fA# 

SOI, 

sol# 

LA 

LAff 

SI 

d6 u 

RE 


251 
238 
225 
211 
199 
188 
177 
168 
158 
149 
141 
133 


Rftjt 

MI r 

soL . 

SOLfl 

LA# 
SI 

RE 


125 

118 

111 

105 

99 

93 

88 

83 

79 

74 

70 

66 


;■■■ jJ 

MI 

FA U 

FA^f 

SOL 

PAUSA 


59 
55 
52 
49 

120 



Figura 1 

forma que os graficos, contribui imensamente para que a crian- 
ca se prenda mais no que lhe e apresentado. A listagem 5 e 
uma rotina em linguagem de maquina que permite a obtencao 
de sons pela porta do cassete. Faca algumas experiencias com 
as chamadas, inclusive dentro de loops, ate* obter os efeitos so- 
noros desejados. 

Finalmente, que tal comemorarmos o sucesso do aprendiza- 
do com uma musica bem apropriada? E por se tratar de musi- 
ca, vamos demonstrar a execucao do "Parabens pra voce", se- 
gundo a ticnica desenvolvida pelo extraordinario Leo Chris- 
topherson, um dos "papas" dos efeitos especiais, autor de di- 
versos jogos ja bastante conhecidos aqui no Brasil, como Dan- 
cing Demon, Voyage of the Valkyrie, Android Nim e muitos ou- 
tros, verdadeiras obras primas de efeitos graficos e sonoros. 
Esta tecnica, que 6 mostrada na listagem 6, jd colocada no do- 
minio publico pelo autor ha algum tempo atrds, utiliza o em- 
pacotamento de strings com rotinas em linguagens de maquina. 



Listagem 3 



10 REM III EXEMPLO 3 
20 REM III CARETINHA 
30 CLEAR 10OO: RANDOM 

40 FACE»=CHR«(1B4>»CHR»<177>»CHR«<172>-»CHR»U44>«-CHR«(160)-CHR»< 
1 56 ) *CHR* ( 1 56 ) *CHR» < 1 80 > *STR I NG* ( B . 24 ) *CHR« < 26 > *CHR« < 1 30 > *CHR» < 1 
31 )*CHR»( 131 ) *CHR« ( 184) *CHR» < 180>*CHR*< 131 ) *CHR«< 131) +CHK«( 129) 
50 RI»"CHR«( 130>»CHR»<I73>*CHR»(1BO)+CHR«<176)*CHR«<176>*CHR«<18 
4>-»CHR«< 138>-«CHR»< 129>»STRING« <B,24)*CHR»<2fc>-»CHR»( 12B)-»CHR»( 128 
)*CHR« ( 130) *CHR« < 131 ) *CHR« ( 131 > *CHR» ( 129) +CHR» ( 128) *CHR«< 128) 
60 TR15TE»-CHR«(128>*CHR»<176)»CHR»< 156>*CHR«.< 140) *CHK*< 140) *CHR 
• ( 172) *CHR» ( 1 76) »CHRt ( 128) *STRING» (8. 24) *CHR» (26) ♦CHft* ( 130) +CHR* 
( 129) *CHR« ( 128) *CHR» ( 1 28) *CHR« < 1 28) +CHR» < 128) *CHR» (130) *CHR« (129 
) 

70 PISCA»-STRIN6»(3, 176>*CHR»{144)*CHR»<160)*STRING»(3. 176) 
BO P0-55:CLS 

90 PRINT«PO.FACE«i«PO*12B,RI*i 

100 PRINT"394."DIGITE UM NUMERO. SE FOR IMPAR EU FICO TRISTE ... 
"I 

110 A»-INKEY«iIF A»-"" THEN R-RND <40> ELSE 140 

120 IF R<3 THEN PRlNT«PO.PISCA«|ELSE IF R>30 THEN PRINT«PO. FACE* 
I 

130 SOTO 110 

140 A-VAL<A«XIF A AND NOT-2 THEN PR I NTSPO* 1 28 . TR ISTE»iELSE PRIN 
T9P0+128.RI*; 
•50 GOTO 110 



Listagem 4 



10 REM II EXEMPLO 4 

20 REM li ROTINA PARA INVERSAO DE VIDEO 

30 REM II ESPACOS E SRAFICOS SERAO INVERT I DOS 

40 REM *« FICANDO AS LETRAS I NT ACT AS 

50 DATA 33.0.60.1.0.4.126.254.32,32 

60 DATA 4.54. 191.24. 12.254, 128. 56, B, 254 

70 DATA 192.48.4.47,238.192.119,35,11.120 

80 DATA 177,32.229.201 

90 FORJ- 28672 TO 28705 iREADAiPOKEJ. AiNEXTJ 

lOO IF PEEK (163961-201 THEN POKE 16526, OlFOKE 16527, 1 1 2ELSE CMD" 

T-iDEFUSR-28672 

110 PRINT-DI6ITE QUALQUER TECLA . .."iGOTO 130 

120 FOR 1-1 TO 2iU-USR<0)iNEXT 'Execute niiHro par de chamadas 

130 IF 1NKEY»-"" THEN 1 JOELSE 120 



Listagem 5 



10 REM Its EXEMPLO 5 

20 REM Sit ROTINA DE SOM, EMPACOTADA NA STRING MS« 

30 MS»»STRING»(27. 191 ) i S-VARPTR (MS») i SS-PEEK (S* 1 ) *256»PEEK' <S*2 1 1 

IFSS >32767THENSS-SS-65536 

40 F0RD-SST0SS*26iR£ADNi POKED. NtNEXTD 

50 IFPEEK( 16396) "20 1THENPOKE 16526. PEEK (S*l) i POKE 16527. PEEK (S*2)E 

LSECMD " T " i DEFUSRO»SS 

60 DATA 205.127,10.77.68,62,1.105.211.255.45.32.253.60.105.211,2 

55.45.32.253,13,16.238.175.2:1.255.201 

70 CLSiPRINT-DIGITE OUALOUER TECLA "« i RANDOM 

80 IF INKEY««"" THEN BOELSE R-RND <3) 

90 ON R GOSUP 120,130,140 

100 GOTO 80 

<10 REM III tfl»«Dlos dm chiiudii, itrivn da «uncao USR. 

E»ptriiwnt« com ootros nuwroi ... 
120 FOR 1-10 TO 20tU-USR(28000*I)iNEXTiRETURN 
130 FOR 1-1 TO 20iU-UBR(1000+RND(1000) ) i NEXTi RETURN 
140 U-USR <10OOO*RND (22000) > i RETURN 



Listagem 6 



10 REM li EXEMPLO 6 

20 CLSjCLEARSOOi PR I NT "PARABENS PRA VOCE -: CMD" T" 

30 S»-" 

40 SI "PEEK (VARPTR <S» ) ♦ 1 > I S2-PEEK (VARPTR (S»> -*2> I SO-S1 *S2I256 

50 POKE16422.SllPOKE16423.S2 

60 A*-" 

70 A 1 -PEEK (VARPTR (A«> *1 > I A2-PEEK (VARPTR (A«> *2> I AO-Al*A2f 256 

SO G0SUB230 

90 POKES0+I.AliPOKEBO*2.A2lPRINT-PRESSI0NE OUAcOUER TECLA PARA E 

XECUTAR- 

lOO IF INKEY*-"" THEN lOOELSE LPRINT 

110 GOTO 100 

120 REM III Rotina dm musica - 70 byt»* 

130 DATA 33.1.1.243.62.1.8.62.35.61.190,32.2.251 

140 DATA 201.126.35.86.94.29,14,10,6,225.21.32,14.87 

150 DATA 62. 120. 190.40.6,8.238.3.211.255.8. 122.86.29 

160 DATA 32.15.95,62.120,190,40.6,8,238,3,211.255.8 

170 DATA 123.94.29.16.219,13.32,214,61.32.209,35.24.193 

180 REM It* MUSICAi duracao. nota (maximo 254 byt»«) 

190 DATA 12.118,8.118.32.105,12.118.16.88,36,93.4.120 

2O0 DATA 12,118.8,118,32,105,12,118,12.79.16.88,24.88.4,120 

210 DATA 8.70.12,70,24,59,16.70,12.88.24.93.16.105.4,120 

220 DATA 12.66.8,66,24,70,24,88,16,79,16,88,32.88.16.120 

230 REST0REiFORN-OT069tREADDiPOKESO+N.DiNEXTN "rotma 0« miici 

240 FOKN-OT061iREADD:POKEAO*N.DiNEXTNiRETURN ■ param»tro« 



As linhas 30 e 60 definem as strings que irao conter a sub-roti- 
na de musica e os parametros musicais, respectivamente ; a string 
da linha 30 contem 70 pontos, que e igual ao niimero de bytes 
da rotina de musica e a string da linha 60 tern um niimero varia- 
vel de pontos, dependendo da quantidade de parametros musi- 
cais a serem passados a sub-rotina. numero desses parametros 
pode ser no maximo de 255, que e o tamanho limite que pode as- 
sumir uma string. Para colocar os seus proprios parametros, refi- 
ra-se a figura 1 onde esta a Tabela de Escalas e encontre os va- 
lores corretos das notas musicais e de suas duracoes. Nao se es- 
queca de mudar o valor final do loop da linha 240. Os parame- 
tros da musica a ser executada deverao ser criados aos pares, 
onde o primeiro parametro corresponde a duracao e o segundo 
ao valor da nota. Apos rodar o programa pela primeira vez, as 
strings das linhas 30 e 60 ja estarao "empacotadas" e voce po- 
dera entao eliminar as linhas 80 e de 1 20 em diante, regravan- 
do o programa. Sempre que voce executar o comando LPRINT 
a musica sera executada. Porem, se voce tiver uma impressora 
conectada ao seu micro, assegure-se de que a mesma esteja des- 
ligada ao executar o programa, pois a rotina reside no endereco 
do ponto-de-entrada do driver de impressora (16422) poden- 
do acontecer resultados inesperados se a mesma estiver ligada. 

Formado em Administragao de Empresas pela UDF, Heber Jorge da Si I- 
va trabalha atualmente na Telebrasilia, onde exerce atividades ligadas a 
programapao de microcomputadores. 
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VOCE (5ANH0U DE PRE5ENTE 
SHOPPING DO FUTURQ 



Pela primeira vez, o fanfe- 
tico mundo da Informatica 
esta reunido num so lugar. 
Rio InfoShopping. 
Uma ideia inteliqente, 
num espago infeiramente 
voltado para essa realidade 
queconquistaacadadia, 
cada vez mais, o seu 
lugar navidade 
todos nos. 
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Um espaco onde voce vai 
conhecer as novidades, os 
ultimos lancamentos e os 
melhores produtos e servi- 
(;os,naAleph5i5temase 
Metodos, Andraus Informa- 
tica, Ciencia Moderna 
Computacao, 
Compumix, 
Computer Shop- 
ping Moore, 



Racimec, R&T Informatica, 
Trade Informatica, Unitel e 
Videomatica. 
Alem delas, no Rio Info- 
Shopping voce tern dois 
conrortaveis auditorios para 
seminarios, convencoes e 
simposios, e o Tech-Room, 
onde os lanqamentos e as 
promotes informaticas 
acontecem. 
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Abertode 
segundaasexta, 
das9as21horas,eaos 
sabados, ate as 18 horas. 

Largo do Machado. 



Computerware, 
CRT., Data Rib- 
bon, Flamengo Vi- 
deo ClutrMikros", 



Venha.O mundo da Infor- 
matica esta aberto Da ra 
voce. 
Mo Largo do Machado, 
junto ao Metro. 
Com estaciona- 
mento proprio. 
Mo Rio lnfo5hop- 
ping. A ultima gera- 
cao dos shopping 
centers. 







Editar, inserir e corrigir programas em linguagem de maquina, no 
seu ZX Spectrum, sao recursos deste Monitor Assembler. Explore-os. 



Monitor Assembler 
no TK BOX 



.Divino Carlos R. Leitao. 



Os usuarios de micros da linha 
Sinclair que sempre acompa- 
nharam MICRO SISTEMAS 
devem se lembrar do Monitor 
Assembler, publicado em MS n? 23, de 
Jose Carlos Niza. Foi com esse programa 
que muitos usuarios comecaram a des- 
vendar os misterios da linguagem de 
maquina e depois puderam usar, mais 
ainda, o potencial dos compativeis com 
o ZX81 atraves do Monitor Basic, de 
Renato Degiovani, e do conhecido MI- 
CRO BUG. 

Agora que ja" existe no Brasil um 
equipamento compativel com o ZX Spec- 
trum, nada mais natural que MS volte 
suas atencdes para essas maquinas, que 
reiinem a conhecida simplicidade dos 
micros Sinclair e caracteristicas antes so 
encontradas em micros mais caros e fora 
do alcance dos nossos bolsos. 

ideal seria poder brindar a voces 
com uma versao do MICRO BUG para 
essas maquinas - e ela ainda vai chegar 
-, mas enquanto isso, ninguem ird ficar 
de maos abanando, ja que o CPD de MS 
elaborou esta nova versao do Monitor 
Assembler para que voces possam carre- 
gar com mais facilidade em seu micro as 
rotinas em linguagem de maquina que, 
certamente, ja encontraram nos diversos 
livros publicados, para o ZX Spectrum, 
e tambem para servir como padrao para 
as rotinas que forem editadas em MS. 

COMO USAR MONITOR 

funcionamento do Monitor e bem 
simples e sua construcao e modular para 
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que no futuro possam ser introduzidas 
novas rotinas. 

Nas linhas de 1000 a 1999 esta a par- 
te de apresentacao e distribuicao do pro- 
grama. Se voce quiser acrescentar algum 
modulo, basta modificar a linha 1030 e 
depois fazer o desvio em qualquer espa- 
90 ate" a linha 1 120, podendo inclusive a 
mesma ser aumentada ate 1499. 

Os modos de operacao sao chamados 
pela inicial da sua funcao. Assim, o mo- 
do H e para entrada/exame de numeros 
hexadecimais; o modo D para entrada/ 
exame de numeros decimals etc. Veja as 
explicacSes a seguir: 

MODO H(2000 a 2499) 

Ao ser acionado, pergunta qua! 6 o 
endereco inicial. A partir da entrada do 
mesmo, voce podera entrar com um da- 
do hexadecimal ou um bloco de dados 
com ate oito elementos. Lembre-se que 
os numeros hexadecimais sao sempre 
constitui'dos de pelo menos um par de 
caracteres entre e F de modo que o 
numero 2, por exemplo, tern que ser es- 
crito como 02. Se a entrada de dados es- 
tiver errada, o programa a recusara. 
Ap6s cada insercao de dados, aparecerao 
na linha 21 da tela o endereco e os da- 
dos digitados, com a soma dos seus by- 
tes a frente. Se for apenas um elemento, 
a soma pode ser considerada como con- 
versfo do numero para o sistema deci- 
mal. 

Neste modo, voce pode ainda entrar 
com qualquer numero precedido de + 
ou -, sendo que neste caso o endereco 
sera incrementado ou decrementado 



do numero digitado; se for digitado 
apenas um dos sinais, o incremento sera 
de 1 ou -1 conforme o caso; para avan- 
car um numero do endereco voce pode 
tambem digitar apenas ENTER. Qual- 
quer valor fora dos parametros fara com 
que reapareca a pergunta "MODO?", de 
onde voce podera' chamar as outras roti- 
nas do programa. A letra M mostrara a 
memoria disponi'vel e a letra E, sozinha, 
fara surgir novamente a pergunta "EN- 
DERECO?" sem sair do modo H. 

MODO D(2500 a 2999) 

Este modo funciona de maneira se- 
melhante ao modo H, porem permite a 
insercSo de apenas um elemento por 
vez, mostrando na tela o endereco, seu 
conteudo e ainda o carater correspon- 
dente ao seu conteudo, exceto se for 
um carater de controle que nao pode ser 
mostrado no video. O conteudo do en- 
dereco e apresentado nas formas deci- 
mal e hexadecimal, porem a entrada de 
dados so e permitida em decimal. Alem 
deste detalhe, valem para este modo as 
mesmas regras de entrada de dados do 
modo H, inclusive as de avanco e retro- 
cesso dos enderecos. 

MODO S(3000 a 3499) 

Este modo arquiva todo o programa 
em fita, usando o comando SAVE. £ 
aconselhavel que voce faca varias grava- 
cSes de cada parte dos programas que 
estiver digitando, para evitar a perda do 
trabalho, se houver algum problema du- 
rante a digitacao. Rotinas acima do 
RAMTOP deverao ser salvas com o co- 1 

MICRO SISTEMAS. Dezembro/85 



A revolucionaria tecnologia da informatica j£ pode ser utilizada por todas as 
pessoas. HOTBIT § o primeiro eomputador feito sob medida para todas 
C|it I A I k AEIKFPC ai necessidades. Ele tem, programas para administer os 
rilN/\IJVlON I C seus rtegocios, controlar tudo na sua casa e levar prazer 

O MICRO QUE FUNCIONA pcssibilidadesnaoparamporaf.Uma 

PI?ATf~W~ , l \At IhdrW^i capacidadedeexpansaogarantida, 

■ IV\ I \J%J\J iVRJ'i tIL/VA programas e sistemas operacionais em disco, 
impressora, modem e outros perifericos fazem o HOTBIT crescer e acompanhar 
a sua evoJucao, Dentro ou fora de casa, voce vai descobnr que existe enfim 
um micro para todos. E para sempre. 

"lOTBIT NA SUA EMPRESAHOTBITecompatfvelcomatecnotogia 
que ajuda a controlar negocios no mundo inteiro: MSX. 
Ajudando na contabilidade, programacao de vendas, estoque, relatortos e 
projetos, reda^ao e copias de cartas, s6 para dar alguns exemplos. HOTBIT da 
mais resultados com menos operacoes, gramas as exclustvas teclas Hot Tocks, 
de funcoes programaveis. E o teclado £ igualzinho ao da maquina de escrever; 
fa la bom portugues, com todos os acentos, 

lOTBIT NA SUA CASAHOTBITajudasuamulheracOTtrolaradespensa, 
o cardapio do mes, a lista do supermercado, as contas a pagar, os juros 
da poupanca, a agenda diaria. Ou entao da dicas sobre biorrttmo, regime, 
receitas favoritas. Tudo isso em imagens bem nitidas, no video de sua TV, 
em 1 6 cores incriveis. Incrfvel tambem & a extensa rede de apoio tecnico a sua 
disposicao- Onde HOTBIT estiver, ele estara 1 sempre bem acompanhado, 

HOTBIT NA VIDA DE SEUS FILHOS 

Nos estudos ou no lazer, HOTBIT tambem esta pronto para 
entrar na vida de seus fithos. Tomando tudo mais facil, 
emocionante e gostoso. 

Eles vao aprender desde a propria linguagem do micro, 
ate ciertcias, matema'tica, ffsica, qufmica e muito mais, 
Vao criar graficos e desenhos, Vao sentir tambem 
toda a emotao dos jogos. £ so acoplar joysticks. 

Passe num revendedor HOTBIT e leve o seu 

para o escritorio. Ou para casa. Ele funciona 

pra tudo. E pra todos. 
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PEQAS ORIGIN AIS 

NUNCA 
PREGAM PEQAS 

No momento em que for necess£ria a expansao de seu AP II ou TJ. Unitron ou ainda a 

reposigao de algum dos componentes, verifique cuidadosamente se as pecas sao originals. 

Fazendo isso voce ou sua empress estarao lucrando mais, com uma s4rie de vantagens, 

A primeira delas esta nagarantia que a faljrica oferece para conjuntos formados com 

acessdrios originals Unitron, Outra vantagem esta' na atta qualidade de uma pega ou acessdrio 

original; voce" ou sua empress confam com a assistencia tecnica sempre presente nos 

mementos necessities, ale'm disso a expansao do seu Unitron sera' sempre assistida 

por tecnicos especializados. 

Cuide do seu patrim&nio. Afinal pecas originais nunca pregam pecas. 
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DH; 

Interface corttrofadora para 
ate* dues unidades de disco 
flexivetdeS 1/4". 



Graph -t-t 

interface paraleta para im- 
pressora com tunofas grift- 
cas e comandos prdpnos pa- 
ra as impressoras nationals. 



+ 16K, + 32K, 
+ 64Ke + 128K: 

Expansdes de Memdna RAM 
com a posstbiltdade de simu- 
lac&o de ' 'disk-drive" de atta 
vetocidede (pseudo-disco). 



Z80; 

Mdduio com microprocessa- 
dorZ-dOadicional. permtindo 
utiiizacao de Sistema Opera- 
tional CPfM. 



80 cotunas: 
Modulo para muoanca dopa- 
drSo de video para 80 coiU' 
nas x 24 linhas. 



Outras expansoes Unitron: Interface para comunicacdes, RS-232C - Memdria Buffer adicional 

para impressora - unidades de disco SUM de 5-Wbu $ 'impressoras de80a 125 CPS, 

mdduio de cores PAL-M ou moduiador de RFpara conexao a TV, - interface GP-IB para controie 

de instrumentacao, - cartao com memdrias EPROMpara insercao de "programas residentes'' 
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mando direto SAVE "NOME" CODE. 

pois nao sao salvas pelo modo S. Veja 
no final do artigo mais esclarecimentos 
a respeilo. 

MODO R(3500a3999) 

F.ste modo e o mais simpatico e um 
grande auxiliar nos programas que ne- 
cessitam de grandesquaniidadesde bytes 
em linha REM. Basta dar o niimero da 
linha, seu lamanho e ate escolher o cara- 
ter da mesma;o resto uma pequena roti- 
na em linguagem de maquina ira fazer 
sozinha. 

Para aqueles que gostam de se apro- 
fundar na logiea dos programas aqui vai 
uma explicac,ao a respeito da rotina. Ela 
esta toda contida na linha 3500 e cada 
elemento do DATA corresponde a um 
byte da rotina. que usa ao todo 89 
bytes. 

A rotina e const rui'da sem endere<;os 
absolutos. podendo ser colocada em 
qualqucr parte da RAM. Neste progra- 
ma. t'oi escolluda a area reservada ao 
Buffer da impressora. Ela usa tambem 
os enderegos 23296/97, para ler o nii- 
mero da linha: 23298/99. para ler o ta- 
manho da linha; e 23670. para ler o c6- 
digo do carater. Se voce desejar usa-la 
em outros programas, basta coloca-la em 
qualquer endere^o e preencher estes 
tres enderec,os (sendo os dois primeiros 
com 16 bits e o terceiro com 8 bits) 
com os valores para que a mesma fun- 
cione. 

MODO B(Retorno ao BASIC) 

Este modo usa apenas a linha 1 100 
para causar um parada no monitor sem 
ter que usar a tecla BREAK. 

MODO M(Memoria disponi'vel) 

Tambem um modo de apoio que usa 
apenas duas linhas (1080 e 1090). Ao 
ser acionado. mostra a quantidade de 
memoria disponi'vel na RAM. Pode ser 
ch.unado diretamente tambem nos mo- 
dus H e D. 

MODO A(4000a4499) 

Tambem um modo importante do 
programa. permite que se apague um 



bloco de linhas. dando o mimero da pri- 
meira e da ultima que se deseja apagar. 
Funciona da mesma forma que o mo- 
do R. Sao 46 bytes que podem ser colo- 
cados em qualquer parte da RAM. A 
exemplo do modo R. usa tambem o 
mesmo espaijo no Buffer da impressora, 
sendo que e aconselhavel estar com a 
impressora desligada ao utilizar estes 
dois modos. Nao e preciso desconecta- 
la do micro, basta desligar a fonte de 
energia da impressora ou apenas coloca- 
la em OFF. se a mesma tiver um inter- 
ruptor para isto. A razao de se usar este 
espac,o e que desta forma o programa 
roda sem modifica^oes em micros de 16 
ou 48 Kb, nao havendo necessidade de 
usar espac,os da RAM que talvez sejam 
necessarios ao programa que voce ira 
digitar. 

Esta rotina tambem usa os endere<;os 
23296/97 e 23298/99 para ler respect i 
vamente os numeros da primeira linha a 
apagar e o da ultima; estes enderec.os. as- 
sim como no modo R, sao fixos e devem 
ser preenchidos antes de ser acionada a 
rotina. No programa isto sera feito au- 
tomaticamente. 

Se voce quiser deletar o Monitor, 
devera faze-lo com um comando direto 
RAND USR 23300 depois que os para- 
metros forem preenchidos; tudo estara 
bem explicado no proprio programa. 
Lembre-se que so devera faze-lo depois 
que tiver certeza que o programa que 
estiver digitando nao content nenhum 
erro. 

ESCLARECIMENTOS FINAIS 

Apos digitar e gravar este programa. 
entre com o comando RUN 1000 para 
acionar o Monitor; se houver qualquer 
problema durante a digita^ao, apenas 
repita este comando e podera iniciar 
onde parou. Quando tiver que digitar 
qualquer rotina no topo da memoria, 
nao esqueija de reservar o espa^o neces- 
sario. Nos micros compativeis com o ZX 
Spectrum basta dar o comando direto 
CLEAR XXXX onde XXXX e o valor 
para o qual voce deseja baixar o topo da 



RAM. Esta area esta livre de apagamen- 
to por NEW, mas tambem n3o sera gra- 
vada se voce usar o comando S do Mo- 
nitor. Para guarda-la em fita, use o co- 
mando direto SAVE "nome do progra- 
ma" CODE XXXX, YYYY onde XXXX 
sera o endereQO do primeiro byte a sal- 
var e YYYY a quantidade de bytes que 
deverao ser salvos apos XXXX. Para re- 
cuperar depois, basta usar o comando 
direto LOAD " " CODE. Nao ha neces- 
sidade de especificar os parametros, pois 
o micro sabera quando ler o Header 
(aquele barulhinho antes das grava^oes). 

Para testar as rotinas que estiver digi- 
tando, use o comando direto RAND 
USR XXXX onde XXXX sera o endere- 
90 de chamada da rotina, mas por uma 
questao de seguranc,a, grave sempre o 
programa antes de fazer qualquer teste. 

O Monitor Assembler foi desenvolvi- 
do em um micro TK90X. por isso utiliza 
o comando SOUND presente na linha 
1550: este comando deve ser substitui- 
do no ZX Spectrum e Timex 2069 pelo 
comando BEEP que fara o mesmo efei- 
to. Na linha 1028. voce encontrara tam- 
bem o comando UDG 0. seguido de dois 
POKEs; elimine esta linha se o seu micro 
nSo for um TK90X, pois este e o co- 
mando correspondente aos caracteres 
acentuados da lingua portuguesa e nao 
existe nos outros compativeis. 

Agora voce ja pode digitar com mais 
facilidade os programas em linguagem 
de maquina no seu compati'vel com o 
ZX Spectrum. 

Para maiores esclarecimentos sobre 
este programa, leia a materia de MS n9 
23, na pagina 10. e tambem o excelente 
livro As Melhores Rotinas para o ZX 
Spectrum de J. Hardmar e A. Hewson. 
publicado pela editora Verbo de Infor- 
matica, e do qual foram extrafdas as ro- 
tinas dos modos R e A. 
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Divino Carlos R. Leitao 6 formado em Dese- 
nho Mecanico pelo Senai. E programador de 
mlcrocomputadores ha tres a nos, tendo inclu- 
sive alguns programas comercializados pela Ci- 
berne Software. Atualmente, trabalha no CPD 
da revista MICRO SISTEMAS, onde desenvol- 
ve jogos e aplicativos em equipamentos que 
utilizam o microprocessador Z-80. 



VEM Al, 
A TAO AGUARDADA 
EDICAO DE JOGOS 

DE 
MICRO SISTEMAS! 



Este ano, MS esta ainda melhor. Alem dos 
programas traz dois artigos especiais: A Programacao de 
Jogos. que descreve rotinas basicas e recursos 
adicionais para incrementar seus jogos e um Editor de 
Adventures, para que voce possa desenvolver jogos de 
adventure personalizado. 
Sem falar em: 

• Microgolf • Polaris • Rally • Fuga Cosmica • Olhadinha 
Roleta, e muito mais! 



NAO PERCA! 
JOGUE-SE 
DE CABEQA 
NESTA AVENTURA, 
EBOM 
DIVERTIMENTO. 



MONITOR ASSEMBLER NO TK90X 



MENU 

1000 CLb : PRINT '"*#** MICRO ED 
I TOR ASSEMBLER »*»«» ZX BPEI PRUM 
/T1MEX 2068/TK90X »««*#»**«»«#*« 




1010 print 



MODOS DE OPFKACAO 



101? PRINT 'TAB 2; BRIGHT 1; FLA 

SH 1;"H''; BRH-Ht 0; FLASH 0;" - 

INSERE DAOOS HEXADECIMAIS" 

1014 PRINT 'TAB 2; BRIGHT 1; FLA 

SH 1;"D"; BRIGHT 0; FLASH 0;" 

INSERE DADOS DECIMA1S" 

1016 PRINT 'TAB 2; BRIGHT 1; FLA 

SH 1;"S": BRIGHT 0; FLASH 0;" 

SALOA EM FITA" 

1018 PRINT 'TAB 2; BRIGHT 1; FLA 

SH 1;"R"; BRIGHT 0; FLASH 0:" - 

CRIA LINHA REM" 

1020 PRINT 'TAB 2; BRIGHT l; FLA 

SH 1;"M"; BRIGHT 0; FLASH 0:" - 

MOSTRA MEMORIA DISPONIVEL" 

1022 PRINT 'TAB 2; BRIGHT 1; FLA 

SH 1;"B"; BRIGHT 0: FLASH 0;" - 

RETORNA AO BASIC" 

1024 PRINT 'TAB 2; BRIGHT 1; FLA 

SH 1;"A"; BRIGHT 0; FLASH 0;" - 

APAGA BLOCOS DE LINHAS" 

1026 LET SOM=1550: POKE 23658,8= 

LET SC=1500: LET X=l 
1028 UDG 0: POKE 65448.28: POKE 
65449,0 

1030 INPUT "MODO 7 ";M%: IF LEN 
M*>1 OR (M4()"A" AND M%< >"M" AND 
M%<)"B" AND M%< >"R" AND M%<>"S" 
AND M%<>"D" AND M4(>"H") THEN G 
OTO 1030 

1040 IF M%="H" THEN GOTO 2000 
1050 IF M4="D" THEN GOTO 2500 
L8&9 IF M*="S" THEN GOTO 3000 
1*70 IF M%="R" THEN GOTO 3500 
1080 IF M%< >"M" THEN GOTO 1100 
1090 LET SP=PEEK 23730+256*PEEK 
23731= LET EL-PEEK 23653+256»PEE 
K 23654: LET X=2: GOSUB SC: PRIN 
T AT 21 ,0;"MEMORIA DISP0N1VEL = 
";SP-EL;" bytes",: LET X=2: GOSU 
B SC 

1100 IF M*="B" THEN STOP 
1110 IF M*="A" THEN GOTO 4000 
1120 GOTO 1030 
1500 IF X< 1 THEN RETURN 
1510 FOR F=l TO X: POKE 23692,3: 
PRINT AT 21,31;" ";: NEXT F : R 
ETURN 

1550 LET X=RNI): FOR F = l TO 20: S 
OUND .025,X: NEXT F: RETURN 

.10D0 H 

2000) INPUT "ENDERECO ? ":E 

2010 LEl Dt="": LET X=l 

2020 LET D=PEEK E: LET A=INT (0/ 

16): LET B=D-INT (D/16>»16: PRIN 

T AT 21,0;" ";AT 2i,(S-LEN S 

TR4 E);E;" - ",,AT 21,8;CHR* <A+ 

(4tl + 7«(A + 48>57) ) ) ;CHR4 <B + <48«-7« 

(48+B>5"> > > 

2930 IF DS = "" THEN INPUT "DADOS 

EM HEX ";D»: IF LEN D4>16 THEN G 

OTO 2070 

2035 IF D*="M" THEN GOTO 1085 

2040 IF D4="F" AND LEN D4=l THEN 

GOTO 2000 
2045 IF D%="" THEN LET E = E+t : GO 
TO 2160 

2050 IF D*<1)="-" OR D%<1> • 
HEN GOSUB 2650s LEI l=E*X: GOTO 
2010 

2060 IF LEN Df/2= T NT (LEN D*/2) 
THEN GOTO 2080 

2070 LET D% = "': PRINT H0S ENTRAD 
A INVALIDA": GOSUB SOM = GOTO 203 


2080 FOR F=i TO LL N D*S II D*(l • 
("0" OR <D*(F)>"9' AND I't-'lx'A" 
) OR D*<F) >"F" THEN B01 L030 
2090 NEXT F: LET 5=«S I I I ■ I I N 
Df>/2 

2100 PRINT AT 21 ,8;L>4; 
2110 LET A=CODE D4(i)*l 1+11 
2* (CODE D*< I ■ >57) I - LEI B i ODI D 
%<2>-< 48* 7 » ' COM D4C 



2120 POKE E.A+B: LET b=S+A»B: IE 

T E=E'i: 1ET W=M(J TO >: IF D% 

< )-■■ I HEN BOTO 2110 

2130 PRINT " = "|B! IF X = l THEN 

GOTO 2160 

2140 PRINT HO: 'CONFIRMS COM ": F 

LASH Is BRIGHT 1;" ENTER " 

2150 PAUSE 0: IF CODE INKEY4013 

THEN LET Di=""5 GOTO 2030 
2160 LET X=i: GOSUB SCs GOTO 202 


MODO D 

2500>INPUI "ENDERECO "> ";E 
2520 LET D=PEEK E= LIT A=INT (D/ 
16): LET B=D-INT <D/16)*16: PRIN 
T AT 21,0;" ":AT 21,(5-LEN S 
TR4 E);E;" - ",,AF 21.C11-LEN ST 
R4 D):D:TAB 13;CHR'B ( A+ < 48+7» ( A+ 
48>57)));CHR% <B+C48+7»(48+B>57) 
));" H";: IF D>32 THEN PRINT TAB 

20;CHR% D 
2530 INPUT "DADO -EM DECIMAL ";Dt 
: IF D4="" THEN LET E=E+l: GOTO 

2610 „ „ -r 

2540 IF D%<1>="-" OR D%<1>= + T 

HEN GOSUB 2650: LET E=E+X: LET X 

=1 : GOTO 2630 

2550 IF D%(D="E" THEN GOTO 2500 

2560 FOR F=l TO LEN D%: IF CODE 

D%(F)<48 OR CODE D*CF>>57 THEN G 

OTO 103O*60»<CODE D*(F>=77> 

2570 NEXT F: GO 1 2590 

3580 IF OAL D%<0 THEN LET E=E+OA 

L D4: GOTO 2620 

?590 IF VAL D5>255 THEN LET E=E + 

YAL Of- GOTO 2620 

:>600 POKE E.UAL D%: LE T E=E+1 

2610 LET D=PEEK <E-1>: LET A=INT 

(D/16): LET B=D-INT (D/16>*16: 
>RINT AT 21,8;" ";AT 21,(11-LEN 
STR4 D>;D;TAB 13?CHR* <A+<48+7» 
(A+48)57) ));CHR* < B + < 48+7*< 48+B > 
57)));" H";: IF D>32 THFN PRINT 
TAB 20;CHR4 D 
3620 LET X=i 

2630 GOSUB SC: GOTO 2520 
^650 LET X=0: IF LEN D<b=l THEN L 
ET X=<D*="-'")-'D* = "-"): RETURN 
2660 FOR F=2 TO LEN D%: IF CODE 
DS(F)(48 OR CODE D*(F>)57 THEN R 
ETURN 
2670 NEXT F: LEI X=OAL D% : RETUR 

N 
MODO S 

3000>CLS : PRINT "Rotina de jrav 
acao,"."siga a sequencia abated 

3010 PRINT '"1- Coloque uma fita 
virgem no Beu gravador e a 
note a sua posicao;" 
3020 PRINT '"2. Verifique se os 
cabo5 est o conectados." 
3030 INPUT "Nome do programa ? < 
«a>: 10 CHR4)";NS: IF N4="" OR LE 
N N*>10 THEN GOTO 3030 
3040 SAOE Hi LINE 1000: GOTO 100 




MODO R 

3500)DATA 
0,017,016, 
5,229,205, 
1 ,237,075, 
3,205,136, 
7,040,011 , 
5,035, 193, 
4,205,136, 
0, 197,205, 
'., ) 16, 015. 
6,015, 193, 
3505 LET D 
3510 CLE -■ 
LINHA REM 
3520 INPUT 
N: IF N<1 
20 



042, 
039, 
110. 
002, 
015, 
058, 
011 , 
015, 
136, 
035. 
035. 
=0 
PRI 



000 
167 
025 
091 
035 
118 
024 
035 
015 
193 
120 



091. 

237, 
,032, 
,197, 
,193, 
,092 
,240 
,193 
, 193 
. 121 
,195 



124, 181 , 
082.208, 
002,225, 
197,062, 
197.120 
205,136 
193.062 
003,003 
035, 121 
197,205 
136,015 



20 
,).-' 
20 
0j 
17 
01 
23 
12 
20 
13 



NT "**** 
** » » " 



CRIAR 



"NUMERO DA LINHA ? 
OR N>9V99 THEN GOTO 



3f 



3525 PRINT '"NUMERO DA LINHA = " 

;N 

3530 INPUT "1AMANH0 DA LINHA " 

;T: IF (PEEK 23730+256*PEEK 2373 

1)-(PEEK 23653+256»PEEK 23654 )( ( 

T+6) THEN PRINT H0;" ESPA INSU 

FICIENTE NA MEMORIA "• GOSUB SOM 

: GOTO 3530 

3535 PRINT '"TAMANHO DA LINHA= " 

;T 

3540 INPUT "CHR* A SER USADO "> " 

-.Ci: IF LEN Ci>l THEN GOTO 3540 

3545 PRINT '"CHRS DA LINHA =^ ' 

;C% 

3550 PRINT H0;"CONFIRME OS DADOS 
"; BRIGHT 1; FLASH 1;"S"; FLASH 
0; BRIGHT 0;"IM "i BRIGHT 1; F 

LASH 1;"N"; BRIGHT 0; FLASH 0>" 

" 

3560 IF INKEY%="N" THEN GOTO 35x 



3570 IF INKEY%="S" THEN GOTO 359 



3580 GOTO 3560 

3590 CLS : PRINT AT 10,10; BRIGH 

T 1: FLASH 1;" AGUARDE ": IF D T 

HEN GOTO 3610 

3600 RESTORE 3500: FOR F=23300 T 

23384: READ X: POKE F.X: NEXT 

F: LET D=l 

3610 RAND N: POKE 23296, PEEK 23o 

70: POKE 23297, PEEK 23671 

3620 RAND T: POKE 23298. PEEK 236 

70: POKE 23299, PEEK 23671 

3630 RAND CODE C%: LET X=USR 233 

00: IF X=0 THEN CLS : PRINT H0;" 

OK. LINHA C0NSTRU1DA": GOSUB SOM 

: GOSUB SOM: GOTO 1000 

3640 CLS : PRINT M0;"A LINHA JA 

EXISTIA NO PROGRAMA, TENTE COM 

UTRO NUMERO...": GOSUB SOM: GOSU 

B SOM: GOTO 3510 

MODO A 

4000>DATA 042,000.091,237,091,00 

2,091,124,181.200,122.179,200,21 

3 , 205 , 1 1 , 025 , 227 , 035 . 205 , 1 1 , 02 

5,209,167,237.082,200,216,235,12 

2,179,200,213,229,205,024,016,22 

5,209,027,024,243 

4010 CLS : LET D=w: PRINT "*«» D 

ELETAR BLOCOS DE LINHAS ***" 

4020 PRINT M0;TAB 3;"QUER DELETA 

R MONITOR ?",TAB 7; BRIGHT >; 

FLASH 1;"S"; FLASH 0; BRIGHT >;" 

IM ot. '; BRIGHT 1; FLASH ;" 

N"; BRIGHT 0; FLASH 0;"AO 

4030 IF INKEY*="S" THEN GOTO 410 

e 

4040 IF INKEY4<>"N" THEN GOTO 40 

30 

405fc INPUT "NUMERO DA PRIMEIRA _ 

INHA ? ";l: IF 1(1 THEN GOTO 405 



4060 INPUT "NUMERO DA ULTIMA LIN 

HA ? ";U: IF U>999 THEN PRINT H© 

;"ATENCAO, MONITOR SERA AFETAD 

0!"» GOSUB SOM 

4070 PRINT '"Apagar linhas entre 

:",I;" e ";U 
4080 PRINT M0:"Conf irme parametr 
os com "; BRIGHT 1; FLASH 1;" EN 
TER ": PAUSE 0: IF CODE INKEYIO 
13 THEN GOTO 4010 

4090 RAND II POKE 23296. PEEK 236 
70: POKE 23298, PEEK 23671 
4092 RAND IJ: POKE 232V8.PEEK 236 
70: POKE 23299, PEEK 23671 
4094 CLS : PRINT AT 10,10; BRIGH 
T 1; FLASH 1;" AGUARDE ' 
4096 RESTORE 4000: FOR F=23300 T 
23341: READ A: POKE F.A: NEXT 
F: IF D THEN GOTO 4150 
4098 RAND USR 23300: GOTO 1000 
4100 LET 1=1000: LET U=5000: LET 
D=i: GOTO 4090 

\110 RESTORE 4000: FOR F=23296 T 
23341: READ A: POKE F.A: NEXT 
F 

4150 CLS : PRINT AT 10,0; Para a 
pagar a MONITOR, digite nomodo d 

ireto : "; BRIGHT 1; FLASH it" R 
AND USR 23300 ": STOP 




Qual dos dois? 



O processo decis6rio na empresa nem sempre 6 tao 
facil. 

Quando comprar e quando vender? 

Qual o preco de venda? E o de compra? 

Onde investir e quanto? 

O que fazer se a inflacao disparar? E se diminuir? 

Como melhorar os resultados? 

Estas sao decisoes que influenciarao diretamente o 
sucesso da empresa. no mundo altamente 
competitive de hoje. 

Tomar a decisao certa. na hora certa, envolve bem 
mais do que digerir quantidades enormes de numeros 
ou pilhas de relat6rios. 



Depende do acesso rapido ao fluxo diario de dados da 
empresa. transformadas em informacoes suscintas e 
pertinentes. 

Envolve a conversao destes dados em modelos 
quantificaveis para anSlise precisa e correta. 

Tome uma decisao j^! 

Conheca o IFPS/Personal 

O mais avancado sistema de apoio a decisoes para 
micro computadores disponfvel no mercado brasileiro. 

Solicite uma demonstracao a DSS INFORMAT1CA. 



DSS SolugOes inteligentes 




DSS INFORMATICA S/C LTDA 



Rua Funchal, 203 — 4? Andar - Cj. 41 
04551 — Vila Olimpia — Sao Paulo - 
Tel.: (01 1)814-3610 
Telex.: (011) 24034 - DSSI 



SP 



Rua Visconde de lnhauma,50-5? And. Cj. 505 
20.091. Centro — Rio de Janeiro — RJ 
Tel.: (021) 233-0673 



Representante exclusivo para o Brasil da EXECUCOM Systems Corporation. 
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Luciano Nilo de Andrade 



A ultima palavra foi 



if 



micro 



Para avaliar quio forte e o jogo do Elite A/S "C", foi 
utilizado o livro do mestre ingles Leonard Barden 
How Good is Your Chess, partida N9 2, J. T. Mangini 
vs A. Kotov, Mar del Plata, 1957. Para que o leitor possa julgar 
a qualidade do jogo, a partida esta reproduzida a seguir com as 
jogadas do Mestre; os pontos ganhos, quando a jogada do mi- 
cro coincidiu com a do Mestre; os que deixou de ganhar por 
n§o acertar, e os tempos gastos. 







MANGINI 


x KOTOV (Micro) 








Mar Del Plata, 


1957 






Jog. 


B 


P 


Pts.G. 


Pts.P. 


Jog. do 
Micro 


Tempos 


1 


P4R 


P4BD 










2 


C3BR 


P3D 


- 


- 


- 


- 


3 


P4D 


PxP 


- 


- 


- 


- 


4 


CxP 


C3BR 


- 


- 


- 


- 


5 


B3D 


C3B 


- 


- 


- 


- 


6 


P3BD 


P4R 


3 


- 


- 


7m 40s 


7 


C2B 


P4D 





2 


B2R 


7m 28s 


8 


PxP 


CxP 





1 


DxP 


0m 4s 


9 


0-0 


B3R 


1 


- 


- 


7m 20s 


10 


D3B 


B3D 





1 


C3B 


7m 5s 


11 


C3R 


CxC 





2 


C5B 


6m 32s 


12 


BxC 


0-0 





1 


D2B 


3m lis 


13 


C2D 


P4B 


3 


- 


- 


3m 13s 


14 


B4BD 


D2R 





2 


BxB 


3m 14s 


15 


BxB+ 


DxB 


1 


- 


- 


lm40s 


16 


P4CD 


P5K 





3 


P5B 


3m 30s 


17 


D2R 


D4R 





3 


P5B 


3m 33s 


18 


D4B+ 


R1T 





1 


T2B 


3m 35s 


19 


P3C 


TD1B 





2 


D3B 


3m 47s 


20 


TR1D 


D3B 





4 


D2R 


4m 33s 


21 


D3C 


B4R 


2 


- 


- 


3m 32s 


22 


C4B 


P5B 


2 


2 


BxP 


3m 31s 


23 


B5B 


P6R 


1 


4 


BxP 


3m 35s 


24 


BxT 


PxP+ 


3 


- 


- 


3m 37s 


25 


R2C 


TxB 


2 


- 


- 


3m 16s 


26 


T3D 


PxP 


2 


- 


- 


3m 16s 


27 


C2D 


PxP 


1 


- 


- 


3m 38s 


28 


C1B 


D3C+ 


2 


- 


- 


7m 18s 








23 


28 


lh 38m 30s 




Posicao final 

Barden escreveu: "as brancas 
abandonaram porque, depois de 
29-T3C BxT; 30-CxB P8B =D+; 
31-TxD TxT; 32-RxT DxC, a par- 
tida esta decidida." 

O Elite AS nao pensa assim. 
Ele indicou uma variante mais in- 
cisiva: 29-T3C D5R + !. Esta jo- 
gada revela como foi superficial 
a analise do mestre ingles: 30-RxP 
T3BI. Com mate indefensa'vel a 
vista. Se 30-R3T P8T =D+, e mas- 
sacrante. 



Polugaievsky x Hort 
Int. de Manilha, 1976 




wm M. mm. %■ - ■» , % 



WM ww 

mm 






p WW. 



As brancas jogaram 1-D7D(?), 
um erro colossal. Como podem as 
pretas cast igar as brancas? 

UIEXEUOp 

-UEqc SBDUEjq sb a j aa81 llU'l 

'•i+«LL8i (i) az.a-i : ovimos 

O Elite A/S. "C" no Ni'vel 5 
gastou 3m 39s e, no Ni'vel 1, so- 
mentc 10s! 



As brancas jogam e ganham. 
- 2t3rl, pb3ppp, 8, 5D2, 8, lPlcd 
CP1.P3P2P, 4TB1R. 



UIBJBUOpUEqE SEOUKiq 

se a cp'^-t' •+tr x a Diaz '+3^a 
ytd-z'axQ ii+ixa-rovimos 

O Elite A/S "2" gastou 40m 
30s para achar a solucao, e o Eli- 
te A/S, Ni'vel 5. 3m 4s. 



Enxadrista experiente, Luciano Nilo de Andrade Ja escreveu para os jor- 
nais "Correio da Manna", "Data News", e "Ultima Mora" e para a revis- 
ta "Fatos & Fotos". Luciano 6 Economista, trabalhando no Ministe'rio 
da Fazenda, no Rio de Janeiro. As opinioes e comenta'rios de Luciano 
Nilo de Andrade, bem como as ultimas novidades do Xadrez jogado por 
computadores, estarao sempre presentes em MICRO SISTEMAS. 





ENERGIA DE 
EMERGENCIA PARA 
MICR0C0MPUTAD0RES 




ESTEWOClJftCONHECIA 
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GERATRON sempre foi a 
solucao ideal e economica para 
alimentagao de emergencia de 
microcomputadores da linha 
Apple e TRS-80. 

Agora voce tern disponfvel o 
GERATRON PC 500. Com 
potencia de 500VA nominal e 
1500VA de pico e dotado de 
chave de transferencia estatica 
e sincronizada, o GERATRON 
PC 500 garante o 
funcionamento ininterrupto dos 
micros compativeis com 
IBM-PC, na configuracao mais 
completa, durante varias horas 
apos a falta de rede eletrica. 

Mas se voce precisa de mais de 
500VA, a GUARDIAN tambem 
dispoe do modelo 750. 



GERATRON e marca 
registrada da GUARDIAN. 

EQUIPAMENTOS ELETRONICOS LTDA. 

Rua Dr Gamier. 579 - Rocha 
CEP 20971 • Rio de Janeiro, RJ 
Tels Geral (021)261-6458 
Vendas (021)201-0195 
Telex (021)34016 




GUARDIAN 



ENERGIA A TODA PROVA 



Agora, voce podera digitar programas em linguagem de maquina 
no seu micro da linha Apple, utilizando este mini-editor Assembler. 



Mini-Assembler 
no A 




Evandro Mascarenhas de Oliveira 



O Mini -Assembler e um programa editor que permite 
trabalhar com a linguagem de maquina nos micros 
da linha Apple. Ele esta gravado na ROM do BASIC 
Inteiro (Integer BASIC), porem nao esta disponivel 
no interpretador Applesoft. 

Diferencia-se dos Editores Assembler plenos por nao usar 
rotulos (labels) ou linhas de comentdrios tipo REM, entretan- 
to, pode-se digitar as instrucOes pelos seus mnemonicos, ao 
contrario da programacSo em codigo de maquina, que e bem 
trabalhosa, exigindo mais atencao do programador. 

Para ser usado nos micros com o Applesoft, e necessario 
te-lo disponivel na memoria. Uma forma de se conseguir isso 
e usar o programa INTBASIC * , encontrado nos discos-mestres 
do DOS 3.3, extraindo-se dele a parte referente ao Mini- 
Assembler. 

Para se atingir este objetivo, observe as seguintes instrucOes: 

1 - Carregar o programa INTBASIC *, que ocupa 50 setores 
(nao e o INTBASIC em disco com 22 setores), atraves do co- 
mando: BLOAD INTBASIC*, AS1003 (o Mini-Assembler 
inicia neste endereco). 

2- Executar o seguinte programa em BASIC, cuja funcSo 
e retirar o Mini- Assembler do INTBASIC* e coloca-lo no en- 
dereco $3500: 

1 HOME 

20 P ■ 

50 B = 13S6B 

40 POKE B,76: POKE B* 1,1 49: POKE B*2,P 

SO FOR K=l TO 7 



60 READ A 

PEEK IB+A - 

80 POKE (B-A),C 

90 C » PEEK (B*A«ll • P -24 5, 

100 POKE IB'A- 

110 NEXT 

120 DAT" . I 1,22 1,21 i, 109,321 

1 30 END 



3— Realocar o programa para o endereco $9300, proximo 
ao initio do DOS($9600), atraves de: 

CALL -151 < RETURN > 

*9300 < 3500 . 37F7M < RETURN > 



4- Finalmente, salva-lo com: 

BSAVE MINI-ASSEMBLER, A$9300, L760 < RETURN > 

programa assim gravado no disco ocupara 760 bytes, indo 
do endereco $9300 ate o endereco $95F8. 

5- Para usa-lo, entrar com: 

BRUN MINI-ASSEMBLER < RETURN > 

que, ao ser executado, colocara o sinal !, indicativo da sua exis- 
tencia, podendo, entao, ser iniciada a digitacSo do programa 
em linguagem de maquina. 

COMANDOS DO MINI-ASSEMBLER 

1 - Se voce estiver no modo monitor (sinal * ) e desejar en- 
trar no Mini- Assembler, digite: 

*9300G < RETURN > 

Feito isso, aparecerd o simbolo indicador do Mini- Assem- 
bler ( !), seguido do cursor. 

2- Para sair do Mini -Assembler e retornar ao monitor, 
digite: 

!$FF69G< RETURN > 

3- Para retornar ao BASIC, aperte < RESET > 

4- Para digitar o programa, entre com o valor do endereco 
inicial, sem o sinal $ , seguido de : e a instrucao em Assembler: 

!300:JSR FC58 < RETURN > 

O sistema colocara o endereco, os c6digos de miquina, a 
instrucao e o operando, se houver: 

0300- 20 58 FC JSR SFC58 









































Demonstracao d< 


> Mini- A* 


sser 


nbl 


er 




BLOW] 


MIKI-ASSEMBl.rj' 




C«rc«q» o programa Mini-Assembler e 


010E- 


00 


8HK 




;o SI10 


CAIX- 


> 5 1 








antra no Monitor 


030F- 
0310- 


00 

20 58 FC 


BRI 
JSR 


SFC58 




•'.Klfli 










EJ<cc.;ta o Mini-Assembler 


0313- 
0316- 
0318- 


20 l>8 F) 
A9 AA 
85 IC 


■ :■ H 


SP1DH 
• SAA 
SIC 




1 100 1 


JSR FC5 










031A- 
031D- 


20 F6 F3 
£0 


JSR 
RTS 


SF)F6 




030D- 




:•■ ." 


JSi- 


SFC58 


Olqitaeao do programa: 


031E- 





BM 






1 JSR 


F 1M 










031F- 
0320- 


00 



... . 
BRK 






030]- 


20 08 


:■ ■ 


.!.-- 


5F3DB 


obaervar o espa^o entre o t e o 


0321- 





BRK 






! LDA 


• AA 








mnemonico a partir da sequnda ins- 
tru?ao (JSR F3D8) 


0322- 
0323- 



00 


BRJ 

any 






■ 


A* AA 




UM 


«SAA 
















■ 










IS320 


20 40 60 AA IF 32 




Dtgitagao de valorea numericos de 






















tabelas a parttr do enderego 5320 








5 i .\ 


s ic 


























I5300L 








030A- 


• 


F3 


JSR 


SF3F6 




0300- 


20 58 PC 


:.fu 


SFC58 




! RTS 












0303- 
0306- 


20 D8 F) 
A9 AA 


i.: a 


SF3D8 
• SAA 




0100- 


'. 




ITS 






0308- 
030A- 


85 IC 

20 F6 F3 


s-.,\ 

ISP 


SIC 
SP3P6 


Listagem apos a diqitagao dos valoioo 
numer icos. 


1S3001 












030D- 
030E- 


60 

00 


RTS 
BM 




Observa-los a partir de endereco S0320 


0300- 


20 58 


i 


;:-.•- 


SFC58 




030F- 


00 


'■rf 






030)- 


20 D8 


1 1 


IS* 


SF3D8 




0310- 


20 58 FC 


isn 


SFC5S 




0306- 


A9 AA 




L:jA 


«SAA 




0313- 


20 D8 P) 


.:sp 


SF3DB 




0308- 


85 'C 




STA 


SIC 




0316- 


A9 AA 


:.: ;, 


• SAA 




030A- 


20 P6 


rt 


.-;•■ 


SP3P6 




0318- 


85 IC 


STA 


SIC 




030D- 


60 




i'TJ 






03IA- 


20 P6 P3 


;~i< 


SP3F6 




030E- 


00 




a?f 




I.istagem das vinte primeiras 


031D- 


60 


RTS 






030F- 


oo 




i-i-r 




Unhas do tnstrugio 


031E- 


Dfl 


BRK 






0310- 


00 




m 






031F- 


oo 


■*?* 






0111- 


00 




^•'K 






0320- 


20 40 60 


I8R 


S6040 




0112- 


00 




■HI 






0321- 


AA 


:a>: 






- 


DO 




:.;.. 






0324 


IP 


??? 






0314- 


00 




:■■-■ 






0325- 


j 


? ? ? 






0315- 


CO 




am 
















0)16- 







m 






IS300 


101 










CO 




oat 














Exibe valores nos enderecoa de S300 


0)1*- 


00 




MU 






0300- 


20 58 FC 20 


D8 F3 A9 


AA 


a S300. A primeira linna possui oito 


0319- 







BM 






0308- 


85 IC 20 F6 


F3 60 




valores e a sequmte oa sets reatantea 


031A- 


00 




BM 
















03IB- 


M 




;«;■>: 






1S300 










!S110- 


100.10DH 






Movimenta^ao de blocos de endere^os 


0300- 


20 


















IS300 a S300,, tmclando en S 3 10 


15)06 










!S300l 












0308- 


15 






Exioe os valores nos enderecos S300, 


0100- 


20 58 


FC 


]SR 


SFC58 












S308 e S30D 


0301- 


20 DB 


FJ 


■:-<' 


SF3D8 




1*100 










0106- 


A. A,. 




t43A 


»..;■;, 














0108- 


85 IC 




STA 


SIC 


Ustaqem apos a movimentagio do bloco 


030D- 


SO 








30A- 


1 


y : 


JSR 


SF3F6 


de enderegos. 












010D- 


60 




:-:•:. 




Obaervar a repetl^ao do programa a 


1S300G 








Execata o programa 



Para continuar, n5o e necessario digitar o endereco seguinte, 
bastando deixar um espaco e entrar com a nova instrucSo; o 
sistema, automaticamente, colocara o endereco correto e o res- 
tante da linha: 

! LDA#0 < RETURN > 
0303-A9 00LDA#$00 

NSo e preciso colocar o sinal $ nos valores numericos, para 
indicar que sao digitos hexadecimais. 

5 - Para listar, entre com o endereco inicial precedido do $ e 
seguido de L: 

!$300L< RETURN > 

Isto exibira as 20 primeiras linhas de instruca"o. Para conti- 
nuar a listagem. basta adicionar S e um novo L ou varios 
L: 

!$LLL< RETURN > 

6- Para executar o programa digitado, entre com o ende- 
reco inicial precedido de S e seguido de G : 

!$300G< RETURN > 

7- Para mostrar valores guardados nos enderecos, digite o 
endereco precedido de $ e seguido de < RETURN > : 

!$ 300 < RETURN > 

8- Para exibir um bloco de enderecos, digite o endereco 
inicial precedido de S, seguido de . e o endereco final: 

! $300. 3 10 < RETURN > 



O bloco sera mostrado em conjunto de oito valores. 

9- Para mover blocos de enderecos, digite o endereco 
inicial para onde vai ser movido, precedido de $, seguido de 
< endereco inicial . endereco final e a letra M: 

!$310 < 300 . 30AM < RETURN > 

10 - Para entrar com valores numericos de tabelas, digite o 
endereco inicial precedido de $ e seguido de : , escrevendo os 
valores separados por espacos: 

!$300: 10 IF 20 AA 96 

Quando houver erro de digitac§o, aparecera o sinal (A) no 
carater errado e soard o sinal sonoro (bip). 

O programa a seguir demonstra os varios comandos do 
Mini- Assembler: 



0100- 
0101- 
6)0»- 
0)01- 
010A- 



jtii snot 



Este programa limpa a tela de texto, colocando-a em modo 
grafico de alta-resoluca"o (full screen) e colorindo a tela em 
vermelho. 

Considerando a utilidade do Mini- Assembler, o autor sugere 
que os fabricantes de micros da linha Apple, que utilizem o 
interpretador Applesoft, incluam em seus discos-mestres o 
programa Mini-Assembler. 

Para compreender a utilizacao do Mini-Assembler, observe 
a listagem de demonstracao feita com a impressora ativada. 



Evandro Mascarenhas de Oliveira 6 MMico e vem desenvolvendo suas 
atividades nas areas de Laboratdrio Clinico e Instrumentacao M6dica. 
Trabalhou quatro anos com o computador Burroghs 6700, do Nucleo 
de Computacao Eletrdnica da UFRJ, nas linguagens FORTRAN IV e 
AL GOL. E usu&rio dos micros NE-Z8000 e AP II. 
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Apple 
Laser IIC 




Apple Laser IIC 

A Milmar Industrie e Comgr- 
cio esta oferecendo um novo inte- 
grante da sua linha de equipamen- 
tos: o microcomputador Apple 
Laser IIC. 

Pesando apenas 1 ,8 Kg e com 
alca pr6pria, o Laser IIC 6 um mi- 
cro portatil que ja" vem com tecla- 
do ergondmico, 64 Kb de RAM, 
alto-falante e interface para dois 
drives de 5 1 /4", gravador cassete. 
monitor colorido (pode ser usado 
um TV), joystick e mouse, ideal 
para trabalho com software inte- 
grado. Alem destes recursos, o 
Apple Laser IIC pode ainda ser li- 
gado a uma placa com diversos 
conectores, o que permite a insta 
lacao de acessbrios como: drives 
de 8". unidades de disco Winches- 
ter, plotter, expansoes de memo- 
ria, etc. A Milmar fica na Av. Dr. 
Cardoso de Melo, 1336, Vila 
Oh'mpia - SP, tel : (01 1 ) 531-3433 



Etiquetas 
autocolantes 



A Novelprint, empresa tradi- 
cional na fabricacao de etiquetas 
autocolantes em formulario con- 
ti'nuo, esta colocando no merca- 
do a etiqueta Duraprint em Data- 
label. Este novo tipo foi desenvol- 
vido especialmente para ser mar- 
cado por computador e depois 
utilizado na identificacao de mi- 
cros, impressoras etc., dispensan- 
do o uso de chapas de metal. 

Maiores informacoes pelo tele- 
Fone(011) 268-4111. 



Programas 
educacionais 

Entre os programas que estao 
dando suporte ao lancamento do 
Expert, da Gradiente, dez estao 
voltados para a area educacional 
e foram desenvolvidos especial- 
mente, sob encomenda do fabri- 
cante, pelo Centro Educacional 
Brasileiro de InformStica. Neste 
primeiro lote estao o Expert 
LOGO, que e a ja conhecida lin- 
guagem LOGO; Toque!, que trans- 
forma o micro num 6rgao eletro- 
nico com oito instrumentos dife- 
rentes e 16 ritmos de acompa- 
nhamento; o Zoo-L6gica, um jogo 
onde cada participante ensina ao 
micro novos nomes de bichos, in- 
crementando o conhecimento da 
m^quina; o Geo-L6gica, um jogo 
que adivinha o pai's que o aluno 
imaginou, com base nas pergun- 
tas sobre caracten'sticas destes 
pai'ses; e uma serie chamada 
Acentue, com programas sobre 
cada uma das regras de acentua- 
cao da lingua portuguesa. Todos 
estes programas serao vendidos 
em cartuchos e a comercializacao 
sera feita pela prdpria Gradiente 
em aproximadamente tn§s mil 
pontos de venda. 



Itautec a 
todo vapor 

A Itautec firmou con- 
v§nio com o Liceu Pasteur, 
o liceu franco-brasileiro de 
Sao Paulo, para o forneci- 
mento, a precos abaixo da 
tabela, de 18 microcompu- 
tadores modelo I -7000, 
com duas unidades de dis- 
co cada um, e mais nove 
equipamentos PCxt, com- 
pati'veis com o PC da IBM. 
Os computadores serao 
usados no Centro de Infor- 
m£tica do Liceu, na area de 
educacao, no trabalho com 
estudantes do jardim ate 
o final do segundo grau. 
Este convenio faz parte do 
projeto Pdlo, da Itautec. 
que facilita a venda de mi- 
cros em colegios e institui- 
pdes de pesquisa. 



Enjoy Sampa 

Atencao usuaVios do CBBS Sampa, o concurso Enjoy Sampa para a 
escolha das mais criativas telas graficas teve seu prazo final prorrogado 
e agora as telas podem ser enviadas ate o dia 31 de dezembro. MICRO 
SISTEMAS 4 uma das patrocinadoras do concurso juntamente com a 
Rhede Tecnologia, fabricante de modems. O vencedor recebera como 
pr§mio um micromodem da Rhede para o seu tipo de micro, e os segun- 
do, terceiro e quarto lugares receberao uma assinatura anual de MICRO 
SISTEMAS. O julgamento das telas e feito pelos prbprios usua>ios do 
CBBS, que hoje ia sao cerca de 130. O primeiro turno vai se realizar na 
primeira quinzena de Janeiro e dele sairao dez finalistas. No segundo 
turno, na segunda quinzena de Janeiro, serao escolhidos entao os quatro 
vencedores. As telas poderao ser vistas no SAMPA a partir do encerra- 
mento da fase de recepcao das mesmas. 




TK-85 acessa Videotexto 

Este mes a Rensi Eletronica estS iniciando a comercializacao de seu 
kit para ligacao do microcomputador TK-85 ao sistema Videotexto da 
Telesp. Estao sendo lancados dois kits diferentes, o primeiro com inter- 
face para ligacao a qualquer modem, com o programa de acesso grava- 
do em EPROM e cabo para conexao ao micro. O segundo kit ja traz um 
modem integrado, bastando liga-lo ao micro para se acessar o sistema. 
Os interessados nos kits podem entrar em contato com a Rensi Eletroni- 
ca Digital, Divisao Videotexto, atrav6s da caixa postal 6661 Sao Paulo 
- Capital, CEP: 01051. 

Plan -Soft: lancamentos 86 

A Software-house Plan-Soft nao quer perder tempo e esta prome- 
tendo, para o infcio de 86, o lancamento de jogos, aplicativos e utilita- 
rios para a linha MSX, contando para isto com o apoio da Sharp. Outro 
lancamento para o comeco do prbximo ano e o gerador de programas 
BASIC, para o CP 500, Pro-Genius. 

Atualmente a empresa esta comercializando doze jogos e um aplica- 
tivo (contas a pagar e receber, por Cr$ 56.000) para oTK90X. Dentre 
os jogos, ja" se destacam o Simulador de Voo (Cr$ 68.000) e Xadrez 
(Cr$ 41.000). 

A Plan-Soft fica na Av. Agua Fria, 925. CEP 02333. tel.: (011) 204- 
2777, Sao Paulo - SP. 

Connect - US Sorteio TK90X 



A Micropic InformStica, repre- 
sentante exclusivo da US Compu- 
tadores. est3 colocando no merca- 
do o Connect -US, um novo soft- 
ware que permite a utilizacao 
de ate oito micros da linha Apple 
como terminais inteligentes de um 
IBM-PC. Segundo Carlo Filippini. 
diretor da Micropic, a grande 
vantagem deste software e que ele 
emula um minicomputador, ja" 
que gerencia todos os micros 
usados como terminais inteligen- 
tes, permitindo o acesso ao banco 
de dados do Winchester. Tudo 
isto, mantendo a mem6ria do PC 
livre. O Connect- US est£ sendo 
comercializado por 140 ORTN e a 
Micropic espera vender Cr$ 500 
milhSes em programas deste tipo 
por mes. O endereco da Micropic 
e Av. Sumare, 287, tel.: (011) 
263-8200. Seo Paulo. 



Maurfcio Moreira Cunha, de 
Macei6 e Jose Carlos Pereira, da 
Bahia, sao os vencedores da pri- 
meira rodada do concurso "Ganhe 
um micro TK90X", promovido 
pela Microdigital em conjunto 
com MICRO SISTEMAS. 

O sorteio foi realizado no ul- 
timo dia 8 de novembro na pre- 
sence da editora responsavel de 
MS, Alda Campos e do Gerente 
de Produtos da Microdigital, Mau- 
ro Zucato Filho. 

Na ocasiao. Mauro Zucato 
Filho ficou tao entusiasmado com 
a receptividade do concurso que 
resolveu promover, alem das pro- 
ximas rodadas (ja previstas), um 
outro sorteio final, dando mais 
uma chance a todos que participa- 
ram da promocao durante os tres 
meses. 



Cabos Pianos Filial carioca 



A Codicomp Eletronica esta 
oferecendo as indiistrias de eletro- 
nica, inform^tica e telecomunica- 
coes, toda uma linha adequada de 
cabos e conectores. Dentre os va- 
rios produtos oferecidos pela em- 
presa, destacam-se os cabos pianos 
(Flat Cables), oferecidos nas bito- 
las 26 e 28, com capacidade sele- 
cion^vel de 14 a 60 vias (fios), e 
que possuem em cada uma das ex- 
r.emidades um conector ja monta- 
oo, de acordo com as especifica- 
coes do cliente. 



A empresa paulista Leader, 
que atua na comercializacao de 
computadores usados de grande 
porte. inaugurou no final de outu- 
bro uma filial no Rio. 

A empresa pretende diversifi- 
car suas atividades e para isto en- 
trou recentemente no mercado de 
minis usados e planeja tambem 
comercializar micros, inicialmente 
novos. A filial carioca da Leader 
fica na Av. Rio Branco, 1815/ 
1606, CEP 20040, tel.: (021) 220- 
0561, Centro. 



1-7000 PCxt. 

O melhor, melhorado. 




o. 



Tudo o que o PC da IBM Jem, o 

1-7000 PCxt da liautec tern Melhorado 

IBM processa numa velocidade 
de 4.77 MHz O Itautec: 4,77 e 8 MHz. 

IBM tern uma resolucao grafica 
600x200 E uma cor O Itautec 600x200 
e 640x400. em 4 cores 

No sistema operacional. o 1-7000 
PCxl lambem leva vantagem IBM 
opera com um unico sistema o MS-DOS. 
O Itautec opera com dots sistemas o SIM/M 
compativel com o CP/M. e o SIM/DOS, 
compaiivel com o MS-DOS Adicsonaimente 
o SlMi'DOS tern a caracter fstica exclusiva 



de operar em multiprocessamento. 

O PCxt da Itautec tern ainda tecla- 
do em portugues e trabalha com Rede 
Local prOpna, a umca no Brasil que permi- 
te a inter ligacao de micros de 8 e 16 bits. 
a uma velocidade de 2.5 megabits 

melhor produlo tern tambem a 
melhor assistencia tecnlca, presente em 
120 locaiidades brasiieiras E. alem de 
lilials nas principals capttais. a Itautec dis- 
poe de uma rede com mais de 50 revende- 
dores autonzados em todo o Brastl 

Conheca o I-7000 PCxt da Itautec 
Omelnor. melhorado 
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Teleimpressor da Stratus 



A Stratus Inform^tica, fabri- 
cante de impressoras. colocou no 
mercado o teleimpressor modelo 
330, que executa sete aplicacoes 
diferentes O modelo pode ser 
acoplado a urn microcomputador, 
atraves da interface RS 232-C que 
ele possui, e funcionarS como im- 
pressora matricial com velocida- 
de de 110 cps, alem de poder ser 
usado tambem como terminal de 
consulta a bancos de dados, espe- 




cialmente o projeto Cirandao. 
Atraves da linha telefonica e mo- 
dem o teleimpressor 330 pode 
emitir e receber textos. A nova 
maquina da Stratus tern buffer de 
edicao de 4 Kb e de 2 Kb para re- 
cepcao. teclado eletronico de 62 
teclas e aceita formula'rio conti- 
nuo ou folhas soltas comuns. Ou- 
tras informacoes podem ser obii 
das na Stratus pelos tels.: (021) 
252-3846 e 252-0623. 



Clube de Treinamento Teenico 



A Suporte Tecnologia, empresa carioca espe- 
cial izada na Manutencao de Computadores, peri- 
f6ncos e redes de dados, lancou o CTT (Clube de 
Treinamento Tgcnico). visando proporcionar as 
empresas um treinamento teenico e pratico de 
alto ni'vel para os seus funcionarios. Dentre os 
cursos oferecidos podemos citar: Semiconduto- 
res, Lbgica I e II, Microprocessadores Z-80, 8086/ 
8088, Manutencao de Terminals de Video, Tele- 



processamento. Assembler, C, Pascal etc. 

Inicialmente. somente as empresas poderao 
participar do CTT, atraves de um contrato com 
duracao de um ano e pagamento de 2 ORTN por 
mes para cada funciona>io inscrito, com direito a 
trfis cursos durante este peri'odo. Maiores infor- 
macoes poderao ser obtidas na prbpria Suporte a 
Av. Presidente Vargas. 542, conjunto 1504, Rio 
de Janeiro-RJ, tel: (021) 263-6594. 



Novas versoes do Gensoft I 

A Gensoft esta oferecendo quatro novas versoes para o seu conheci- 
do Gensoft I. A primeira e o Gensoft I Plus (110 ORTN), disponfvel 
para os compatfveis com IBM -PC e XT. onde foram ampliados os re- 
cursos de edipao de textos e calculo, alem de ter sido incorporada uma 
rotina de apresentacao mais rapida das telas. 

O Gensoft Exe (35 ORTN) e uma versao reduzida do Gensoft I para 
micros de 8 e 16 bits, onde foi eliminada parte do Mbdulo de Desen- 
volvimento. sendo dirigido aos grandes clientes. Ja o Gensoft Jr (40 
ORTN) e voltado para profissionais liberals e incorpora um editor de 
texto, tratamento de calculos. menu e um sistema de teclas de funcao 
(so para 16 bits). Por ultimo, o Gensoft Escreva (25 ORTN) um soft- 
ware para edicao de textos que oferece todos os recursos dos editores 
tradicionais, para micros de 16 bits. O telefone da Gensoft e (011) 
881-2320. 

Livros sobre MUMPS 

A McGraw-Hill e a Medidata vao lancar uma serie sobre MUMPS. O 
primeiro livro da serie ser3 MUMPS — Manual da Linguagem e esta pre- 
visto para chegar nas lojas em fevereiro de 1986. 

Segundo Fernando Del Valle, Diretor de Suporte da Medidata, a se- 
rie nao esta totalmente definida e ainda nab se tern o nome dos outros 
livros que serao publicados. 

A McGraw-Hill assinou tambem um contrato com Oscar Burd e Luiz 
Young, Diretores do CEBI, para a publicacao, em marco, de uma serie 
sobre c padrao MSX. 

Kit para 
Apple 

A Embracom Eletrdnica est3 
colocando no mercado seu kit pa- 
ra acesso de micros da linha Apple 
aos servicos Videotexto e Ciran- 
dao. O kit e composto por uma 
interface serial, um cabo de liga- 
cao e os softwares para acesso ao 
Videotexto ou ao Cirandao. Acom- 
panha tambem um modem assi'n- 
crono que opera na velocidade 
1200/75. O preco de lanpamento 
do kit da Embracom e de 24 
ORTN. Maiores informacSes a res- 
peito podem ser obtidas na pro- 
pria empresa atraves do telefone: 
(011) 521-6044. 



Programa 
astrologico 

A Buddy Byte I nform5tica co- 
locou no mercado um software 
auxiliar para calculo dos elemen- 
tos basicos do horoscope o Astro- 
byte. Desenvolvido para ser utili- 
zado em micros da linha Apple, o 
Astrobyte pode, em apenas um 
minuto. obter as posicoes dos pla- 
netas, tres sistemas de casas, a po- 
sicao do vertice e de Liliih etc. A 
comercializacao do novo progra- 
ma est£ sendo feita diretamence 
pela Buddy Byte, que fica na rua 
Abi'ho Soares. 278, sala 5, em Sao 
Paulo. O Astrobyte vem acompa- 
nhado de um manual completo de 
instrucoes que facilitam o manu- 
seio por parte do usuaVio. Maiores 
informacoes podem ser obtidas 
pelotel :(01D 285-0464. 



Treinomovel 

Treinomovel, este e o novo 
servkjo que a Datalbgica passou a 
oferecer a seus clientes. Trata-se 
de salas de aula mbveis, total- 
mente equipadas, para serem ins- 
taladas nas empresas que necessi- 
tem de treinamento na a>ea de 
informatica. Os cursos mbveis tern 
a mesma duracao dos que sao 
ministrados no centro de treina- 
mento da Datalogica (40 horas), 
e no preco de 600 ORTN estao 
inclui'dos o material, instalacao 
e professores. Os interessados 
devem contactar a empresa em 
Sao Paulo pelo telefone (011) 
283-0355 ou no Rio (021) 
240-8909. 



Catdlogo 
Cobra 

A Cobra Computadores 
esta colocando a disposk;ao 
de seus usuarios e clientes 
em geral, atraves de suas 1 1 
filiais em todo Brasil, a se- 
gunda edicao do seu Cata- 
logo de Programas. 

O catalogo possui 700 
p^ginas e relaciona 612 
programas aplicativos dis- 
pom'veis para toda a linha 
de equipamentos Cobra 
Nele esta"o listados o nome 
do programa, empresa pro- 
dutora, aplicacao, equipa- 
mentos compatfveis, siste- 
ma operacional e lingua- 
gem. 



Um novo 
Unix 



Esta sendo comeicializado pe- 
la Omega um novo sistema ope- 
racional similar ao Unix. Tiaia-se 
do UNICA. criado poi uma 
softwaie- house paulista do mes- 
mo nome. 

O sistema, desenvolvido em 
linguagem Pascal, e um geradoi 
de aplicativos multiusuario e mul- 
utarefa. com funcionamenio em 
tempo real, e permite a hgacac 
em rede dos micros MC -400 e 
MPC-400XT, compatfveis respec 
tivamente com o Apple e o XT. 
da IBM. A Omega |a esta of ere 
cendo quase quarenia aplicativos 
desenvolvidos a panir do UNICA 
Maiores informacoes pelos telefo 
nes (011) 276-1276 e 275 4199 



Cursos 
Servimec 



Na Servimec Sao Paulo esiao 
programados. para dezembro, se- 
minanos sobre dBase III, Lotus 
1-2-3 e dBase II O de dBase III 
sera de 11 a 13, das 09.00 as 
1 7:30h; o de Lotus 1-2-3 aconte- 
cera de 16 a 20, das 19:00 as 
23:00h. e do dia 16 ao dia 18. das 
09:00 as 1 7 :30h. havera um semi 
nano sobre dBase II Maioies 
informacoes na Rua Corroa dos 
Santos, 34. Bom Retno, Sao Pau- 
lo, ou pelo tel (011) 222-1511 



Software 
SPI 



A SPI — Tecnologia em In 
formatica, em coniunto com a sua 
principal aoomsta. a SPA - Sis 
temas. Planejamento e Analise. es- 
tao comercializando dois pacotes. 
Open Access e Conducior, ambos 
para equipamentos compatfveis 
como IBM-PC 

O Conductor e uma linguagem 
de quarta gerac§o e o Open Access 
e um sistema mtegrado composio 
de seis mbdulos: Gerenciador de 
Informacoes; Folha de Calculo. 
Processador de Textos. Graficos, 
Agenda e Comunicacoes, por 
258 ORTN. Os telefones da SPI 
sao (021) 262-8455 e (011) 
884-3144. 



Novo enderevo 

A Assistencia Tecnica da Mi- 
crodigital, no Rio de Janeiro, ago- 
ra tern novo endereco. Ela esta 
localizada a Rua Santa Luzia, 
799, conj. 302, Centro, tel. 
(021) 220-8263. 



•PEDID0S PARA AH Editors Ltda , Av. Pre*. Wilson, 165 grupo 1210 CEP 20.030 - Rio de Janeiro - RJ, anexando cheque nominal ■ 
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Modos graficos especiais: va alem do manual e conhega 
os recursos deste potential oculto dos micros TRS Color. 



Graficos especiais 



Claudio Costa 



Em MICRO SISTEMAS n? 48 discutimos alguns aspec- 
tos relacionados com a programacao de graficos nos mi- 
cros da linha TRS Color. Um desses aspectos dizia res- 
peito aos modos graficos especiais, que nao s3o descri- 
tos no manual e na"o pertencem tambem ao repert6rio do 
BASIC desses equipamentos. Tendo em vista as poucas infor- 
macOes disponiveis sobre o assunto, este e um capitulo que 
merece ser tratado a parte, a fim de esclarecer tanto duvidas 
quanto alguns concertos fundamentals acerca deste potencial 
oculto do Color Computer. 

Um aspecto que deve ficar claro, com relaca"o a esses modos 
graficos, e o carter seletivo de sua manipulacSo. A organizacSo 
do display nos modos semigraficos apresenta caracten'sticas 
bastante diferenciadas, enquanto que nos modos estritamente 
graTicos nem sempre e possivel utilizar as rotinas do Extended 
Color BA§IC para gerenciamento de graTicos - tais como 
CIRCLE, PAINT , DRAW e outras. Na pratica, apenas as ins- 
trucOes POKE e PEEK poderSo ser usadas para controle das 
informacOes de video, entretanto se o programa for muito 
extenso tornar-se-d lento. £ facil notar que s6 o usuirio que 
possui maior intimidade com a maquina, alem de algum co- 
nhecimento de programacSo Assembler, podera contornar 
tais UmitacOes e utilizar plenamente esses novos recursos. 
N3o hi como negar, todavia, que a criatividade muitas vezes 
fala mais alto do que a tecnica, e neste ponto e importante 
um conhecimento maior das possibilidades do equipamento. 
Vale a pena, por isso, conhecer e tentar dominar esses modos 
graficos especiais. 

CONCEITOS BASICOS 

Sabemos que o video no Color Computer e controlado por 
dois microprocessadores, o Video Display Generator (VDG) 
e o Synchronous Address Multiplexor (SAM), interfaceados ao 
sistema por um Peripheral Interface Adaptor (PIA). O modo 
grafico em uso e determinado pela posica"o dos bits do byte 
SFF22, que e o registro de controle do VDG, conforme mos- 
tra a figura 1. 

Alem disso, existem tres pares de registros de controle do 
SAM, nos enderecos SFFCO/1, SFFC2/3 e SFFC4/5, que 
devem ser ajustados de acordo com os valores dos bits 4-6 do 
VDG. Funcionando em sincronia, o VDG e o SAM admitem a 
selecao entre oito modos estritamente graficos, que utilizam 
dois conjuntos alternatives de duas ou quatro cores. Como a 
seleclo do modo de operacfo destes dispositivos e realizada 
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Figura I 

por software, tal sincronia nao e obrigatoria, e em termos fun- 
cionais e possivel ter o VDG e o SAM operando de forma dis- 
tinta, desde que isto ocorra dentro de certos parametros. Este 
e o principio bdsico para a obtencao de modos semigraficos 
especiais, que permitem, por exemplo, simular alta-resolucao 
com texto e oito cores simultaneas. Ainda dentro do sistema 
normal, e possivel acessar tres modos graficos simples, alem 
de caracteres especiais semelhantes aos do TRS-80 modelo III. 

Para mostrar os modos graficos adicionais, a partir do 
BASIC, usaremos um macete, que consiste em ajustar o ende- 
reco inicial da tela grafica em 5600 - o mesmo endereco usa- 
do pelo BASIC. Dessa forma, PCLS funciona normalmente, 
enquanto a selecSo do modo grafico pode ser feita atraves de 
um POKE em cada valor correspondente nos registros de 
controle. As variaveis do sistema que apontam a cor e a ultima 
posicSo da tela para PCLS podem igualmente ser ajustadas por 
meio de POKE, a fim de refletirem a cor e o tamanho corretos 
do display. Se a intencao e usar o Assembler, vale lembrar que 
toda instrucao POKE equivale a uma operacao LOAD, regis- 
trador com um determinado valor, e STORE, o valor desse 
registrador num dado endereco. Para utilizar a rotina de PCLS 
da ROM num programa Assembler, basta carregar o endereco 
de initio da tela em SBA, o endereco final mais 1 em SB7 e 
comandar JSR $9542. 

Todos os enderecos citados neste artigo sao validos para os 
equipamentos que nao possuem disco. Os sistemas de disco 
utilizam parte da primeira pagina grafica como buffer, e o 
endereco inicial da tela e realocado em SE00. Neste caso, 
deve-se somar $800 aos enderecos descritos. 

MODOS GRAFICOS 

BASIC admite o acesso a cinco modos graficos distintos 
(PMODE a 4). Os PMODE 1 e 3 operam com conjuntos alter- 
natives de quatro cores, e como requerem, respectivamente, 
3 e 6 Kb de memoria RAM para serem mapeados, sSo tambem 



conhecidos como modos 3C e 6C. Os demais modos - PMODE 
0, 2 e 4 - possuem conjuntos de duas cores, e sa"o tambem 
chamados de 2R, 3R e 6R. Os tres modos grdficos adicionais, 
que nao sa"o reconhecidos pelo BASIC, se caracterizam pela 
baixa resolucSo e necessitam de pequena quantidade de memo- 
ria para serem representados, o que os habilita para animacao 
quadro-a-quadro ou ilustracoes com menor grau de detalha- 
mento. Dois destes modos graficos operam com quatro cores, 
e o ultimo com duas. 

MODOS DE QUATRO CORES 

O primeiro modo graTico adicional e denominado 1C e apre- 
senta uma resolucSo de 64 x 64 pontos, ocupando 1024 bytes 
de memoria RAM. Estabelecendo-se o endereco $600 como 
primeira posicSo de vfdeo, a ultima posicao sera $9FF. 

O programa a seguir mostra a configuracao dos registros de 
controle, as dimensOes da tela e o tamanho do ponto no modo 
1C: 

I REM MODO !C 

ID POKE «.HB7. I0:PCLS ■ ajusta PCLS pnra limpar a tela ate 

S9FF I2S6- 
-.•o POKE *HKFC7,o • end. true, tela grafica = S600 

bH80 - proqrama VDG: substituu por 1H88 
[> rolor Sft 1 
40 POKE 4HFFC1.0 ' programa SAM 
■iO POKE 4H600.64:POKE kH9FF.' ' mostra Umites superior e 

■ r da tela e tamanho do ponto 
70 GOTO 70 • conge la a imag*m 

Para se ter uma ideia do nivel de resoluca"o e so desenhar 
uma linha no centro da tela: 

60 FOR J =&H7E0TO&H7EF:POKEJ,85:NEXT 

O segundo modo grafico de quatro cores requer 2048 bytes 



para ser representado e possui uma resolucao de 1 28 x 64 
pontos. 

O programa abaixo demonstra os dados dos registros de 
controle, a dimensSo do ponto e o nivel de resolucao deste 
modo, denominado 2C: 

I HEM MODO 2C 

KB iHB". 1CPCLS 
iO POKE 4HFFC7.0 
SO POKE tHFF2.'.*HA0 ■ tHAtt p cob-: ••■• I 

KE kHFFCl.o 
'.0 POKE 4H600,64:POKE »HDFF.' 

. •:• kH9FF:POKE 1,8 HI ■ 

I 



MODOS DE DUAS CORES 

Como o modo 2C, o modo adicional 1 R tambem apresenta 
uma resolucSo de 1 28 x 64 pontos, porem como s6 duas cores 
podem ser combinadas, apenas 1024 bytes sa"o necessarios para 
mapeamento. 

' REM MODO IB 
10 POKE *HB7. 10: PCLS 
I v r -. .!:-.-■ . 

■ . ■■■■ '■ ■ k><<48 p/ color se- 1 
40 POKE tHPFC ' 

SO POKE MtCOD, W7:POKE 4H9FF.2S4 
60 FOR J.I.H7E0 TO lH7 E F:POKF. 1. 0: NEXT 
70 GOTO 70 

MODOS SEMIGRAFICOS 

Alem dos modos estritamente graficos, onde o elemento 
fundamental e o ponto ou pixel, o VDG e capaz de gerar mo- 
dos semigraficos, onde o elemento fundamental e representado m 



COMUNICAgAO ENTRE MICROS PARA 
TRANSFERENCIA DE ARQTJIVOS 



TRANSFERE c a solucao para o seu problcma 
de icr varios mil ros com formatos de diskette ou 
sistemas opcracioirais incumpadveis. 

Com o TRANSFERE voce} pode transferer 
arquivos nine dois um ms atraves de uma 
liga<,ao por i abo. O TRANSFERE usa as 
interfai es sen. us dos seus micros, podrudo 
funciunar com vclocidade de transmissao dc ate 
Q600 bauds. 

Na tabcla ao lada voce t*tt< ontra as ( aracteristicas 
m. us importanres do TRANSFERE. Use-a para 
l.n ilitar .1 sua drcisao dc i ompra, comparando o 

TRANSFERE com os couc onc-nics. 

Computadores ja suponados: POLYMAX, 
EDISA. DISMAC, TELSIST. ITAl'TEC, 
PROLOGIC A. MICRO! EC. SCOPUS, 
UNITRON. MICROENGENHO, todos os 

1 umpauveis com o APPLE usando placa CP/M e 
todos os ci>ui|).ui\<is dim o IBM PC (onsulii'- 
110s se o m.'u computador nao esti listado, novas 
\i tsi'm-s estao sendo leiiasi. 

PRECO: 20 ORTN's para c ompaiiviis com o 
APPLE II. 

30 ORTNs para micros CP/M 
40 ORTNs para micros MS-DOS 
(compativcis com IBM PC) 



INTELSOFT 



•'' Compare voce mesmo TRANSFERE com os concorrentes " 


CARACTERISTICAS 


TRANSFERE 




Permite a transferSncia de arquivos entre 
micros CP/M e compatfveis com IBM PC 


SIM 




Faz a transmissao usando um protocolo de 
venficafao e correcao automatica de erros 


SIM 




Transmite qualquer tipo de arquivo. como 
fontes de programas, textos, arquivos de 
dados, programas executaVeis, etc. 


SIM 




Permite transmits vanos arquivos com um 
cinico comando. usando a convencao de ? e 
para especificar cjrupo. 


SIM 




A transmissao pode ser feita atraves de 
ligacao direta por cabo ou atraves de linhas 
telefomcas usando modems. 


SIM 




Para transference de arquivos basta dar o 
comando em um dos micros ligados. outro 
responde automaticamente. 


SIM 




Permite acessar qualquer drive em qualquer 
um dos micros, podendo lister diret6nos do 
micro local ou do remote 


SIM 




Permite emular um terminal com protocolo 
TTY para ligacao com CIRANDAO, DISQUE- 
BOLSA. ARUANDA e outros servicjos. 


SIM 




Acompanha programa um manual 
completo, que explica detalhadamente a sua 
utilizacSo 


SIM 


J 



INTELSOFT Pronto e D 
Praia do Fiamengo 66 S 



senvoivimemo de Sistemab S/C Liaa 

ala 1 1 04 CEP 22210 Tel (02 1 )265 3346 - Rio de Janeiro - RJ 
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GRAFICOS ESPECIA1S 



MODO S4 
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MODO 



L3 L2 Ll LO 



COR 



MATRIZ DC 
CARATER 



000 


= VERDE 


100 


= CINZA 


001 


= AMARELO 


101 


= CIANO 


010 


= AZUL 


110 


= ROXO 


011 


= VERMELHO 


111 


• LARANJA 



Figura 2 

por simbolos graficos especiais, que podem ser exibidos na 
tela de maneira semelhante aos caracteres de texto. Dentro 
deste conceito, e possivel exibir simultaneamente caracteres 
graficos e alfanumericos, de maneira a se obter ilustra90es sim- 
ples. O VDG possui dois modos semigraficos, chamados de 4 
e 6, em funcao do niimero de elementos em que pode ser 
dividido o cardter grafico. 

MODO SEMIGRAFICO 4 

Este modo semigrafico e suportado pelo BASIC atraves das 
Uustra^Oes SET/ RESET e PRINT CHR$(n), onde n e um nii- 
mero entre 128 e 255. O carater grafico pode assumir uma 
entre oito cores. Conilra no esquema da figura 2. 

O byte de video nesse modo e organizado de maneira que 
os bits 0-3 refletem o formato do cardter: se o valor do bit for 
1, o elemento correspondente esta aceso e e mostrado na cor 
indicada pelos bits 4-6; caso contrario esse mesmo elemento 
e considerado apagado, sendo exibido em preto. Por este moti- 
ve os elementos que compOem um carater grafico nao podem 
assumir mais de uma cor. O programa abaixo ilustra os forma- 
tos possiveis de um carater: 

• o as t 

20 ro> j.m n> ioi,ruirf in. mutJii 

>o ir :«»«»■-• TH» 10 

40 mrr 

so core so 

MODO SEMIGRAFICO 6 

Como o nome indica, o carater neste modo semigrafico 
e composto por 6 elementos, o que permite uma resolu5§o 
de 64 x 48 pontos. A matriz dos caracteres e identica a dos ca- 
racteres graficos 128 a 191 do CP-500, embora, salvo algumas 
coincidencias, nlo exista qualquer correlacSo entre os codigos 
desses mesmos caracteres. Veja o esquema da figura 3. 

Neste modo, seis bits (0-5) definem a configuracao do cara- 
ter, o que deixa apenas os bits 6 e 7 disponiveis para indicacSo 
de cor. Como o bit 7 e tambem usado como indicador de mo- 
do grafico, apenas azul e vermelho do conjunto de cores e 
roxo e laranja do conjunto de cores 1 , podem ser combinados 
numa mesma tela. Este modo nao e compatfvel com texto, 
e assim os caracteres so podem ser acessados por meio de 
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POKE no video. O programa a seguir mostra os caracteres do 
modo semigrafico 6 : 



'0 rout mm 


UUIiCLS • • 


;0 fO» >UI Ti 


■ OIlKME 4H« 


io :r minis-" 


THEN 10 


«o «xt 




SO COTO so 
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Figura 4 



Ate aqui trabalhamos com os microprocessadores para 
controle de video em sincronia. Toda vez que o VDG era pro- 
gramado para um modo grafico, o SAM era setado para funcio- 
nar de maneira correspondente. Como foi dito no initio deste 
artigo, e possivel tirar partido desta sincronia e obter mais 
tres modos semigraficos especiais. Para entender melhor o fun- 
cionamento do processo, comece considerando a matriz de 
um carater alfanum^rico, ilustrada na figura 4. 

Levando-se em conta que a resolu- 
9«io maxima no Color Computer e 
de 256 x 192 pontos, isto resulta 
em 256/8 =32 colunas por 192/12 
= 16 linhas, que e o arranjo do dis- 
play para a tela de texto. Nos mo- 
dos semigraficos especiais, o VDG e 
programado em modo texto, e o 
SAM num dos modos graficos de 
quatro cores (2C, 3C ou 6C); dessa 
maneira, embora o video seja orga- 
nizado em modo graTico, o elemen- 
to fundamental do display continua 
sendo o carter, logo e possivel 
combinar texto e as oito cores da 
tela com o uso de SET/ RESET. Dentro desta configuracao, os 
caracteres graTicos e alfanumericos permanecem nas posi^Oes 
estabelecidas pela divisao de 32 colunas por 16 linhas, porem a 
matriz original de 8 x 12 passa a ser acessada em fracOes me- 
nores, o que significa que mais de 1 byte sera necessdrio para 
representar um carater - na pratica 4, 6 ou 1 2, dependendo do 
modo grafico utilizado. Como o SAM esta em modo grafico, 
onde a imagem e composta linha a linha, esses bytes nao sao 
organizados de forma continua, mas em intervalos de 32 bytes 
cada - o tamanho de uma linha do display em modo graTico. 

Vamos tentar compreender o que isso tudo significa. O 
programa a seguir seleciona um modo semigrafico e imprime o 
carater "A" no centro da tela. Pressione qualquer tecla para 
proceder a impressa"o. 

10 POKE »HB7.}0:POKE iHdJ.99 a]usta cor * ultima 

posicao de PCLS 
20 POKE tHFPC7 # 

30 POKE 4HFF22.0 ■ VDC tm modo texto 
40 POKE kHPFCi.OtPOKE 4HFFCS.0 ' SAM cm modo 4C 
SO I-1H108F • po«. inicial de impressio do car. 
60 FOR J- 1 TO 12 
70 IF INKEVS-" THEN 70 
80 POKE 1,65 ' 6WSC I "A" I 
90 1M»)2:NEXT ' prox . impr . apos J2 bytes 
100 GOTO 100 

Note que a impressao nffo e realizada de uma s6 vez, mas 
em 12 intervalos separados por 32 bytes. Experimente modifi- 
car o codigo do cardter, na linha 80, e o endereco inicial de 
impressfo por qualquer outro entre $600 e $ 1DFF, na linha 
50, para entender melhor o que foi dito. 

O poder destes modos graficos reside na possibilidade de 
se misturar informa96es de diversos caracteres, obtendo-se 
novos simbolos e caracteres graficos, alem de facilidades como 
sublinhamento, vinhetas, etc. Experimente introduzir estas 
modifica95es no programa anterior: 

10 POKE iHB3.24S:PCLS 
60 FOB J.l TO >2:READ A 
70 POKE I, A 
80 l-!+32:NEXT 

90 DATA 207. 207. 207. 1S9. 159. 159. 2SS. 25S. 255. 
191. 191. 191 
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a dimensSo do ponto neste modo grafico, veja a figura 6 e mo- 
difique as seguintes linhas do ultimo programa: 



Figura 5 



Figura 6 



Figura 7 



O novo carater grafico e obtido atraves da ju^So das linhas 
de quatro caracteres graficos originais. 

MODO SEMIGRAFICO 8 

Este e o primeiro modo semigrafico extra obtido atraves da 
programa9a"o diferenciada dos microprocessadores de video. 
O carater grafico pode ser dividido em oito elementos, a partir 
de uma matriz de 2 x 4. Observe na figura 5 que a resoh^So 
obtida e de 64 x 64 pontos, e 2048 bytes sSo necesssirios para 
mapeamento. 

'U POKE IHBI. IJI 
JO TO«t lMfrO'.0:(-WE HIFTJ.'.v 

jo poke tHrrci.o 

«0 POKE kUB). M.-PCLS 

SO POKE mt00 ts; : pn«E kHOPr.HS 

»0 PO» J.lH9riO to m^rr 

•0 POKE J.1SVHEXT 

•n com »o 

MODO SEMIGRAFICO 12 

Este modo permite uma resolu95o de 64 x 96 pontos e usa 
3072 bytes de memoria RAM. Para ver o nivel de resoli^ao e 



IP POKE 4.HFFC5.0 
40 POKE IHB7. 

*if! POKE *H600,152:POKE kill IFF. 14- 
60 FOP 1'I.HBEO TO kHBFF 
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Aqui, 6144 bytes sSo necessarios para representar este mo- 
do semigrafico, que e o que admite maior resolu9ao: 64 x 192 
pontos. Cada linha da matriz do carater mostrado na figura 7 
pode ser acessado individualmente. Modifique estas linhas do 
exemplo anterior: 

.!,<■ 

'■ -l 4-.' ..„,,.. I 
>•».. " 4'' 

CONCLUSAO 

Embora indiscutivelmente poderoso, o sistema grafico 
BASIC do Color Computer n3o esgota as possibilidades de tra- 
balho do equipamento. Os modos graficos opcionais - e os 
semigraficos, em particular - constituem um novo espa9o para 
a cria9ao grafica nesta familia de micros. objetivo deste arti- 
go e apenas complementar as informa9(5es do manual e funcio- 
nar como uma intrudu93o a esta face menos conhecida da pro- 
grama95o grafica no TRS Color; a experimenta9a"o com este 
sistema e um passo fundamental no sentido de se confirmar 
que, neste campo, muita coisa ainda existe para ser criada e m 
descoberta. * 



Claud to Costa 6 Desenhista free-lancer e tern como hobby a programa- 
cao de m icrocomputadores. 



CONTABILIDADE ON-LINE PARA 
MICROCOMPUTADORES 



A Contabilidade INTELSOFT e a unica que realmenie 
funciona em modo on-line. A qualquer momento voce 
pode fazer consultas no video para obter saldos de 
qualquer conta e lancamentos em format;o de razao. 

A Contabilidade INTELSOFT funciona tanto em 
mi< ros de 8 bits, com sistema operational CP/M, como 
cm micros de 16 bits, compativeis com o IBM PC. 
Todas as versoes sao funcionalmente identicas 
podendo os mesmos anjuivos serem usados por 
qualquer versao. Isso significa que ao mudar de 
computador voce continua trabalhando da mesma 
maneira e aproveita iniegralmente o trabalho ja feito. 

Na tabcla ao lado voce encontra as caracteristicas mais 
importantcs da Contabilidade INTELSOFT. Use-a 
para facilitar a sua decisao de compra, comparando-a 
com as concorrentes. 

PRECO: 150 ORTNs para micros CP/M 

200 ORTNs para micros MS-DOS 
(compativeis com IBM PC) 

Caso voce qucira experimentar o sistema antes de 
compra-lo, a INTELSOFT fornece um pacotc de 
demon stracSo por apenas 15 ORTNs. O pacoie de 
demonstracao e uma versao complcta do sistema, sem 
nenlnuna limitacao, acompanhada do manual. O valor 
do pacote de demonstracao pode ser aplicado 
integralmente, em ORTNs, na compra do sistema, em 
um prazo maximo de 60 dias. 



f compare voce mesmo a nossa contabilidade com os concorrentes A 


CARACTERISTICAS 


INTELSOFT 




Totalmente controlado por menus e 
realmente on-line. 


SIM 




Niimero maximo de contas 
Niimero maximo de langamentos 
Maximo de algarismos por valor 
Maximo de graus no piano 


65535 

65535 

15 
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Codigo de conta flexfvel e definido pelo 
usuario com niimero vanavel de di'gitos por 
grau. 


SIM 




Lanpamentos de partida simples ou dobrada 


SIM 




Histdricos livres e padronirados 


SIM 




Permite trabalhar com ou sem centavos 


SIM 




Permite consolidar os dados de diversas 
empresas ou filiais 


SIM 




Emite relat6rios especiais para corretoras e 
distribuidoras de acordo com os modelos do 
Banco Central 


SIM 




Permite que os dados do sistema sejam 
convertidos para serem usados por pacotes 
como o dBASE II ou III. LOTUS 1 -2-3. 
VISICALC ou por programas escritos em 
qualquer linguagem. 


SIM 


J 



INTELSOFT 



INTELSOFT Projeto e Desenvolvimenio de Sisiemas S/C Ltda. 

Praia do Flamengo 66 Saia 1 1 04 CEP 22210 Tel. (02 1 )265 3346 - Rio de Janeiro - RJ 



O computador 
na sala de aula 




Enquanto ainda se discute a melhor forma de utilizar 

o computador na educagao, muitas escolas ja se anteciparam, 

adotando o micro como uma valiosa ferramenta de ensino. 



Einteressante verificar o impacto 
que as novas tecnologias trazidas 
pelo desenvolvimento da infor- 
matica acabam causando nos 
adultos de hoje em dia, que cresceram e 
foram educados num mundo no qual o 
homem ainda se preparava para alcancar 
a lua. Imaginem agora o que o uso con- 
tinuado destes recursos na Educacao 
causara aos jovens que, se agora ja sen- 
tern a presenca de novas tecnologias, 
sentirao muito mais ainda diante de um 
"mundo informatizado", que lhes cerca- 
ra na fase adulta 

OS PROS 

Quando se considera a intersecao des- 
ses dois campos do conhecimento e pre- 
ciso enfocar dois aspect os: a educacao 
informatizada e a educacao para a infor- 
matizacao. primeiro deles e o uso do 
computador no ensino como um recur- 
so, nSo em substituicao ao professor, 
mas em auxflio a este; e o segundo as- 
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pecto, que acontece consequentemente, 
e a preparacao da crianca para o mundo 
tecnologico com o qual, cada vez mais. 
ela tera contato em sua vida diaria. 

Como destacou o Professor Eduardo 
Chaves, Coordenador do Projeto Edu- 
com - Informatica na Educacao, da 
Unicamp, em palestra proferida durante 
o XV11I Congresso Nacional de Informa- 
tica, "deve-se tomar as medidas necessa- 
rias para preparar a sociedade, em espe- 
cial os jovens, para as transformacoes 
que estao acontecendo e vao ocorrer em 
conseqiiencia da introducao macica do 
computador na sociedade e na fabrica 
cultural brasileira. E e aqui que a educa- 
cao tern seu papel". 

Quanto a cn'tica daqueles que afir- 
mam que existe uma serie de questSes 
bisicas na educacao, que devem ser 
atendidas prioritariamente antes de se 
pensar em gastos com equipamentos ca- 
ros como os computadores, Chaves diz 
nao discordar de que condi^oes de infra- 
estrutura adequadas para as escolas sao 



de fato prioritdrias, porem inclui tam- 
bem a preparacao dos alunos para viver 
e atuar profissionalmente no seculo XXI 
como uma prioridade. "Apresentar o 
computador k crianca, desmistifica-lo, 
mostrar o seu potencial e as suas limita- 
Coes, ensinar a crianca como utiliza-lo e 
domina-lo sa"o func5es que nenhuma es- 
cola pode se furtar hoje. Amanha ja se- 
ra" muito tarde", afirma Chaves. 

Professor Eduardo Chaves destaca 
ainda o fato de que, "sendo o processo 
de informatiza^ao da sociedade irrever- 
si'vel, muitas escolas particulares ja estao 
introduzindo o computador no processo 
de ensino e aprendizagem . E o Gover- 
no", diz ele, "a despeito da gravidade 
dos problemas que afetam a escola pii- 
blica. nao pode ignorar esse fato, o que 
levaria a um aumento da distancia entre 
o ensino oferecido na rede oficial e o 
ministrado nas escolas particulares". 

Chaves ressalta ainda que o contato 
regrado e orientado da crianca com o 
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computador- contribui positivamente 
para o aceleramento do seu desenvolvi- 
mento cognitivo e intelectual, especial- 
mente no que diz respeito ao raciocinio 
ldgico e formal, a capacidade de pensar 
com rigor e sistematicidade, e a habilida- 
de de inventar ou encontrar solucoes 
para os problemas. 

OS CONTRAS 

Professor Waldemar Setzer, do Ins- 
tituto de Matematica e Estatistica da 
Universidade de Sao Paulo, ja e conheci- 
do por sua postura radicalmente contra 
o uso do computador no ensino de pri- 
meiro grau, e chegou a publicar um ma- 
nifesto no qual explica sua posicao. Seu 
enfoque baseia-se nas iddias do pensador 
Rudolf Steiner (1861-1925), que divide 
a evolucao do ser humano, inicialmente, 
em tres fases de sete anos cada uma (de 
a sete anos; dos sete aos 14 e dos 14 
aos 2 1 anos). 

Seguindo a opiniao de Steiner, o Pro- 
fessor Setzer explica que o pensamento 
da crianca no segundo setenio tern a ca- 
ractenstica de ser imaginativo, e nao 
abstrato, e que por esse motivo a educa- 
cao nesse periodo, que equivale ao pri- 
meiro grau, deveria ser toda baseada em 
atividades arti'sticas. Segundo Stezer, o 
erro esta em se querer desenvolver abs- 
tracao e raciocinio 16gico antes da epoca 



adequada, isto e, antes da puberdade, do 
primeiro grau. "Depois da puberdade, a 
crianca tern seu pensamento liberado, 
podendo entao usa-lo para comecar a 
formular conceitos e teorias formais", 
esclarece. Mas o Professor Setzer ressal- 
ta que, como a maquina exerce um fas- 
ci'nio enorme, ele colocaria o jovem em 
contato com ela apenas no ultimo ano 
do segundo grau. 

Em seu manifesto, Waldemar Setzer 
mostra que, alem de instrumento da ins- 
trucao programada, o computador e 
tambem usado no ensino como instru- 
mento de simulacao. "Mas a simula?ao 
exige um modelo matematico, e este 
n3o existe no mundo real, s6 na mente 
dos modeladores. Por que nao experi- 
mentar com a realidade, em lugar de 
modela-la matematicamente?", questio- 
na Setzer. Mesmo considerando interes- 
sante o projeto LOGO, desenvolvido no 
Massachussets Institute of Technology 
(MIT), pelo educador Seymor Papert, 
no final da decada de 60, Setzer critica e 
condena o sistema de Papert dizendo 
que este consiste basicamente no apren- 
dizado de uma linguagem de programa- 
q&O e no aprendizado de construcao de 
algoritmos atraves de um sistema intera- 
tivo. 

Por outro lado, na visao de Stezer, os 
alunos deveriam completar o segundo 
grau com nocoes bdsicas do que e um 



computador, um programa, e com habi- 
lidade para construir programas bem 
simples. "E a razSo disso", expUca ele, 
"e que o computador esta (infelizmen- 
te) penetrando em todas as atividades 
humanas; e 6 bom desmistifica-lo, a fun 
de que nao seja um misterio...". 

Com relacao a mecaniza^ao das for- 
mas de pensar que o computador pode 
produzir na crianca, Eduardo Chaves re- 
bate o argumento dizendo que, ao inve's 
de ficarmos lamentando os possiveis 
efeitos funestos que a presence do com- 
putador na educacao poderia produzir, 
devemos eXplorar maneiras de orientar 
a influencia que o computador pode ter 
sobre a aprendizagem e a forma de pen- 
sar da crianca para direcoes positivas e 
desejdveis. E completa afirmando que 
"em contato com o computador, a cri- 
anca muito cedo aprende a entender e a 
articular o que e pensamento mecanico 
e o que nao e". "Essa habilidade podera 
Ihe permitir, quando confrontada com 
algum problema, escolher o estilo de 
pensamento mais adequado para resolve- 
lo", completa Chaves. 

FORMAS DE UTILIZACAO DO 
COMPLTADOR NO ENSINO 

AJem do ensino de computacao, que 
engloba desde o manuseio do equipa- 
mento ate o conhecimento de lingua- fl 




Com o Kit de Comunicacao para Banco 
de Dados da Embracom voce tern livre 
acesso, atraves de seu micro, a 
informacoes como saldo bancario, roteiros 
de viagens, cotacoes e taxas do mercado, 
previsao do tempo, noticiarios nacionais e 
internacionais e muito mais. 

Por muito menos. 

Basta uma linha telefonica - em casa ou 
no escritbrio. O Kit de Comunicacao para 
Banco de Dados da Embracom contem um 
MODEM adaptavel a qualquer micro, uma 
placa de comunicacao que desenvolve 
todas as funcoes da convencional RS 232 



com duas diferencas: custa 3 vezes menos 
e e 3 vezes menor. 

Alem de um diskete de 5 1 /4 com 
softwares para o Videotexto e Cirandao, 
cabo de interligacao, embalagem especial 
e um manual de instrucoes. 

Faca seu micro render o maximo para 
voce: conecte-o aos sistemas de 
Videotexto, Cirandao/Embratel ou outro 
banco de dados que opera a 1 200/75 bps. 

Comparado a qualquer conjunto de 
comunicacao de dados, o Kit completo com 
MODEM da Embracom representa uma 
economia que nao tern comparacao. 



Venha conferir. 

Se voce ja possui o MODEM pode 
adquirir, separadamente, o diskete e a 
placa de comunicacao. 



--VA-' 
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Cmbracom cleuonico. o.a. 

Av de Pinedo. 645 - Socorro - Tel.: 521-6044 - CP 604 
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gens e programacao, o computador pode 
ser aplicado na area educational de ou- 
tras formas. A primeira e mais difundida 
seria o uso do computador na instrucao 
programada, ou seja, o computador ensi- 
na o aluno at raves do programa que re- 
cebe para isso, funcionando quase que 
como um audiovisual que leva o estu- 
dante a participar, dando respostas as 
questoes apresentadas no video. No uso 
em simulacoes, a maquina projeta feno- 
menos que ocorrem naturalmente para 
testar a reacao do aluno. Uma terceira 
forma de utilizacao de computador no 
ensino seria a aprendizagem pela desco- 



No uso do computador como tutora- 
do, o aluno assume a posicao de instru- 
tor da maquina, ou seja, ele proprio 
construira o programa a ser usado no 
ensino. Neste caso, alem de serem neces- 
sdrias as nocoes bdsicas de tecnicas de 
programacSo, o estudante devera ter do- 
mmio sobre a materia a qua! pretende 
"ensinar" ao computador. Por exemplo, 
um aluno que ja tenha aprendido as qua- 
tro operacSes basicas (adicjio, subtra^ao, 
multiplicacao e divisao), desde que saiba 
algumas tecnicas de programacao, pode- 
ra montar um programa para ensinar o 
computador a tutorar outros estudantes 



"Corn um software bem concebido, 
o computador tutor pode fdcil 
e rapidamente acomodar sua apre- 
sentagao a um grande numero de 
| particularidades de cada estudante. " 




berta. como acontece com a linguagem 
LOGO. 

TUTOR OUTUTORADO 

Segundo relatorio do Centro de In- 
formatica Educativa (Cenifor). orgao 
vinculado ao MEC que e responsavel 
pelo projeto Educom-Informatica na 
Educacao, com as experiencias desenvol- 
vidas pelas instituicoes de ensino de pri- 
meiro e segundo graus no pais, verifica- 
se que o computador esta sendo usado 
no contexto educational em tres catego- 
rias: como tutor, como tutorado e como 
ferramenta. 

Nesse ultimo caso, o micro e utiliza- 
do com software especi'fico para deter- 
minadas areas como Geografia, Matema- 
tica. Geometria etc. 

O computador como tutor funciona 
da seguinte maneira: a maquina faz per- 
guntas sobre determinado assunto. E ao 
responder, o aluno interage com ela, sen- 
do ainda avaliado. Esta avaliacao vai de- 
terminar a sequencia de questoes a ser 
apresentada. Diz o relatbrio do Cenifor 
que "com um software bem concebido. 
o computador tutor pode facil e bem ra- 
pidamente acomodar sua apresentacao a 
grande numero de particularidades exis- 
tentes em cada estudante" O texto 
menciona ainda que "no modo tutor, 
o historico do desempenho de um ou 
mais estudantes pode ser coletado e ar- 
mazenado, de forma que e possivel ao 
professor obter relatorios de acompa- 

nhamento sempre que julgar necessa- 
rio". 
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neste assunto. estudo do Cenifor "Re- 
lato do Estado do Ensino de Informati- 
ca no Brasil" destaca que o modo tuto- 
rado tern tido o apoio de va'rios pesqui- 



sadores que afirmam que, ensinando ao 
computador o aluno aprende mais pro- 
fundamente do que atrave'sde softwares 
tutorais. 

O COMPUTADOR N AS 
ESCOLAS PARTICULARES 

Seja qua! for a modalidade, no entan- 
to, o que se ve hoje e um numero cada 
vez maior de instituicoes de ensino em- 
pregando micros no processo de aprendi- 
zagem. Os pioneiros nessa pratica, no 
Brasil, foram as Escolas Americanas, 
com um trabalho semelhante ao que e 
desenvolvido nos Estados Unidos, onde 
as crian^as passam a ter contato com o 
computador a partir dos quatro anos, e 
no segundo grau aprendem as primeiras 
linguagens de computacjio. 

A seguir, outros estabelecimentos de 
ensino seguiram a mesma trilha. Temos, 
so no Estado de Sao Paulo os Colegios 
Pueri Domus, Bandeirantes, Brasil, Ob- 
jetivo, Liceu Pasteur, entre outros. 

Pueri Domus foi um dos precurso- 
rs, pois ja no initio de 1982 oferecia 
cursos de computac2o como irea profis- 
sionalizante do segundo grau. Pueri 
Domus tern cerca de cinco mil alunos, 
do maternal ate o fim do segundo grau, e 
utiliza a linguagem LOGO junto as crian - 
gas do primeiro grau como curso ext racur- 



Software educacional 



Um problema que esti intimamente re- 
iacionado com o uso do microcomputador 
no ensino c que afeta tanto a rede oficial 
quanto a privada, e a pouca disponibilida- 
de de software educacional de boa quali- 
dadc. 

A sai'da para esse impasse, adotada por 
muitas instituicoes de ensino, ,6 o desenvol- 
vimento de software educacional proprio, 
com a cnacao muitas vezes de um departa- 
mento especi'fico para isso. Desse modo, 
pode-sc aliar a experiencia dida'tica do edu- 
cador com os conhecimentos do programa- 
dor. 

Entretanto, temos algumas investidas 
particulares bem-sucedidas. E o caso do 
CEBI, Centro Educacional Brasileiro de In- 
forma'tica, uma das poucas software-hou- 
ses que se dedica exclusivamente ao desen- 
volvimento de programas voltados para a 
educacao. A uniao de dois fisicos, ambos 
interessados pela area pedag6gica, resultou 
num trabalho se'rio, recentemente atestado 
pelas duas empresas que entraram na area 
de micros, usando tecnologia MSX, a Gra- 
dient e e a Sharp. Como ambos equtpamen- 
tos tern a educacao como uma de suas 
principals aplicacSes, as empresas procura- 
ram o CEBI na busca de suporte de soft- 
ware para o lancamento de suas maquinas. 
O contrato acabou sendo fechado com a 
primeira, que esta colocando no mercado 
dez programas de educacao, todos descn- 
volvidos pelo Centro. 

"Esse mercado de software educacional 
esti em ini'cio de explosao", afirma Oscar 



Burd, um dos s6cios do CEBI. "Os fabri- 
cantes comecaram a se preocupar com esse 
segmento para a u merit a r a venda de suas 
maquinas, e naturalmente esta aumentan- 
do a concorrencia, e isso e muito bom para 
o consumidor final que sempre vai lucrar 
com a melhoria de qualklade do software". 

Centro Educacional tern hoje uma 
equipe de dez pessoas fixas e cada progra- 
ma leva em media quatro meses para ser 
desenvolvido, isso num ritmo de trabalho 
de oito horas diarias, c depois ainda sao 
t estados in loco, nos colegios. No ini'cio do 
desenvolvimento 6 definida a materia so- 
bre a qual versara o programa e o topico 
especi'fico, por exemplo, equacao de 29 
grau etc.. segundo ponto 6 encontrar 
um especialista neste t6pico, que e na ver- 
dade quern cria o programa. Alem do pe- 
dagogo, o desenvolvimento de um progra- 
ma educacional envolve um especialista em 
musica, outro na area grafica, alguem que 
entenda de comunicacao - para determi- 
nar o tipo de linguagem que facilitara a in- 
teracao com o aluno etc. - e e claro, os 
analistas. 

Segundo Oscar Burd, o mais import an- 
te em um programa educacional c como se 
da a comunicacao entre o usuario e a ma- 
quina. "Temos uma grande preocupacao 
com as partes afetiva e social que o progra- 
ma vai causar", ressalta Oscar, "se por 
exemplo as criancas que estao em volta da 
maquina se sentirao motivadasa participar 
opinando etc., esta e a nossa preocupacao 
basica". 




O Modon UP- 1237 e o quatro em um da Parks 
porque opera em transmissoes asancronas a 
velotidades de 1200/75 bps ou 300 bps, no padrflo 
CCnr ou no padrflo BcU. 

Voce vai encontrar nesse modem outros 
dtferentiau que a Parks desenvolveu para oferecer o 
maximo em (ecnologia: 

* dispositive de resposta automaitca incorporado, 
possibiUtando a formacao de redes de 
computadores usando comunicacao via tinhas 
edefonicas discadas. 

* comutacao manual modem/telefone a partir de 



chave no painel frontal, permiiindo accsso aos 
grandes bancos de dados nadonais e internacionais. 

• selccao de vejotidade no painel frontal. 

• facilidade de teste de enlace analogico local para 
diagnostico do equipamento. 

• visualizacao da siiuacao de configuracao e dos 
circuitos de interface por meio de onze indicadores 
luminosos no painel TrontaJ. 

Como voct sabe„ para a Parks o mclhor e a 
perfeicao. Por isso, voce tera a seguranca de um 
rigoroso controJe de qualidade e garantia de 2 anos. 

Comprove, 
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ricular. Os professores do Colegio estio 
sendo treinado&, pois a partir do proxi- 
mo ano a "Introducio a Informitica" 
passa a fazer parte do curriculo da ter- 
ceira serie do primeiro grau em diante. 
Tambem a partir do inicio do pr6ximo 
ano letivo, os micros do Pueri Domus se- 
rao usados nas areas de Quimica e Fisica 
no ensino assistido por computador, 
com software desenvolvido pela Domus 
Informitica, empresa surgida do Niicleo 
de Informatica do colegio. 

Colegio Bandeirantes, que abrange 
da quinta a oitava se"rie e possui hoje 
mais de tres mil alunos, desde 1981 ofe- 
rece cursos opcionais das linguagens As- 
sembler e BASIC, a partir da setima se- 
rie. Desde entSo os micros sSo usados 
tambem para recapitulacao das aulas, 
com software desenvolvido no pr6prio 
Colegio. Ha cerca de dois anos os acio- 
nistas do Coldgio criaram a Bandeirantes 
Informatica, para poderem prestar servi- 
90s a terceiros. Aldm de software edu- 
cacional e de gerenciamento escolar, a 
empresa tambe'm atua na irea de hard- 
ware, desenvolvendo interfaces para li- 
gac,ao de micros a equipamentos usados 
nos laboratorios da escola. 

Colegio Objetivo abrange do ma- 
ternal ate* o cursinho pre-vestibular e 
possui oito unidades so em Sao Paulo, 
todas com microcomputadores que sao 
usados em sala de aula, como recurso 
auxiliar para o professor, e nos laborato- 
ries, onde os alunos tern acesso atraves 
da maquina a materia dada em aula. 
Alem disso, o curso basico de informati- 
ca e" obrigat6rio na primeira serie do se- 
gundo grau. software utilizado e total- 
mente desenvolvido no Departamento 
de Anilise e Desenvolvimento do pro- 
prio Cole'gio, com base nos pedidos dos 
professores. Esse departamento e com- 
posto por texnicos e pedagogos. Obje- 
tivo possui ainda um curso te'enico de 
processamento de dados, com duracao 
de tres anos, durante os quais sa"o ensi- 
nadas as linguagens BASIC, Assembler, 
COBOL e Fortran. 

COMPUTADOR NA REDE 
OFICIAL DE ENSINO 

As discussdes a nivel de governo so- 
bre o uso do computador no ensino ti- 
veram inicio em 1981, quando institui- 
?5es como MEC, CNPq, Secretaria Es- 
pecial de Informatica e a Finep realiza- 
ram seminirios para debater o assunto. 
No final daquele ano, foi aprovado um 
documento cujo ti'tulo era "Subsidios 
para a implantacao do Programa de In- 
formatica na Educacio". 

Em 1983 e* entSo criada uma Comis- 
sao Especial de Informatica na Educa- 
c3o, ligada a SEI. A ideia inicial foi, con- 
forme sugestSo dos participantes dos I e 
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II Seminirios Nacionais de Informitica 
na EducafSo - realizados respectiva- 
mente em 1981 e 1982 - de se criar 
centros pilotos em universidades para 
que estes promovessem atividades volta- 
das para a aplicacio das tecnologias da 
informitica na educa^Io. Para tanto, 6 
elaborado um projeto denominado Edu- 
com - Informitica na EducacSo, cujo 
objetivo e* o estimulo ao desenvolvimen- 
to da pesquisa multidisciplinar voltada 
para a aplicacSo das tecnologias de in- 
formitica no processo de ensino-apren- 
dizagem. Vinte e seis instituicSes de en- 
sino superior encaminharam propostas 



sendo dada enfase a introduc,ao do com 
putador no ensino de matemitica no 
primeiro e segundo grau das escolas pu- 
blicas, com estudo dos aspectos socio- 
politicos e culturais dessa implantacao. 
projeto da Universidade de Pernambu- 
co preve ainda a cria^ao de uma rede lo- 
cal de micros de baixo custo para ensi- 
no. 

projeto da Universidade do Rio de 
Janeiro enfatiza o uso do computador 
no segundo grau nas ireas de matemiti- 
ca e^iencias, e preve o desenvolvimento, 
a nivel de hardware, de duas estates: 
uma para a elaborac^o de material peda- 




Em seu primeiro ano, a 
preocupagao bdsica do 
EDUCOM foi com apreparagdo 
dos prof essores que irao 
implantar o micro nas escolas. 



para a implanta9§o dos centros pilotos 
em seus campus e cinco foram selecio- 
nadas. Sao as Universidades Federais de 
Minas Gerais, Pernambuco, Rio Grande 
do Sul, Rio de Janeiro e Universidade de 
Campinas. A Coordena9§o Te'cnica do 
Projeto, a nivel federal, foi atribuida a 
Funda92o Centro Brasileiro de TV Edu- 
cativa (Funteve) que criou o Cenifor — 
Centro de Informitica Educativa -, 
para cuidar especificamente do Educom. 

Educom foi implant ado efetiva- 
mente em meados de 1984 e seu primei- 
ro ano se encerraria em julho desse ano, 
mas foi estendido ate dezembro para co- 
incidir com o ano fiscal. Durante este 
primeiro ano, a preocupagao bisica dos 
centros pilotos foi com a preparasio dos 
professores que participarao da implan- 
ta^io do computador nas escolas da re- 
de oficial. Em outubro come90u a ser 
feita uma avaliacao dos primeiros doze 
meses do projeto e a aprecia9§o dos pia- 
nos para segundo ano. 

Cada um dos centros pilotos tern seu 
pr6prio projeto dentro do Educom. Na 
Universidade Federal de Minas, por 
exemplo, foram criados quatro labora- 
t6rios que se dedicam especificamente 
ao desenvolvimento de recursos huma- 
nos para a implantacio da Informitica 
no ensino; ao desenvolvimento de soft- 
ware; a aplicacao desses programas; e a 
servicos gerais como a criacSo de lingua- 
gens de comunica9io para a intera9§o 
entre o professor e o computador na ela- 
bora93o de material de instrucao. 

Na Universidade de Pernambuco esti Reportagem de Stela Uchtermacher 



g6gico pelo professor e outra propria- 
mente voltada para o ensino, alem da 
elabora^ao de software educacional e 
tambe'm da prepara9io de recursos hu- 
manos. 

Na Universidade do Rio Grande do 
Sul, o Educom tern se dedicado ao de- 
senvolvimento de sistemas e a pritica do 
uso de micros no processo de ensino 
com estudo dos efeitos dessa implanta- 
930. Em uma escola da periferia de Por- 
to Alegre foram instalados microcompu- 
tadores para o trabalho junto a crian^as 
repetentes da primeira slrie do primeiro 
grau e, segundo relato da Professora Lu- 
cila Costi Santarosa, Coordenadora do 
Projeto naquela Universidade, os resulta- 
dos tern sido surpreendentes em termos 
de progresso desses alunos. 

Na Universidade de Campinas, a base 
do Educom e a filosofia LOGO. A Uni- 
camp foi uma das primeiras universida- 
des a estudar e colocar em pritica a lin- 
guagem LOGO, adequando-a a realidade 
brasileira. Neste primeiro ano do Edu- 
com, os professores foram treinados e 
desenvolveram projetos para o uso do 
computador com as crian9as. A Uni- 
camp adquiriu nesse segundo semestre 
12 micros que serio repassados para tres 
escolas estaduais, onde teri inicio a pri- 
tica do uso dos micros no ensino da rede 
oficial. 




O APPLE DA DIGITUS 



A DIGITUS langa o DGT-AR um 
microcomputador pessoal totalmente 
compativel em hardware e software com 
a linha APPLE II PLUS e seus similares. 

O DGT-AP e um micro versatil, pois, alem 
de Ihe ser util no trabalho, voce podera 
tambem usa-lo no lazer e nos estudos. 

Devido ao grande numero de programas 
desenvolvidos para a linha APPLE, o DGT- 
AP tern ampla aplicagao tanto para as 
pequenas e medias empresas como para 
os executivos e os profissionais liberals. 



U3 tfxi — m 



j5 



Projetado para atender e acompanhar o 
desenvolvimento do usuario, o DGT-AP 
possui estrutura para aceitar futuras 
expansoes, crescendo de acordo com 
suas necessidades. 

DGT-AP tern todas as caracterfsticas 
basicas comuns a um micro da linha 
APPLE com a vantagem de um teclado 
numerico reduzido incorporado a CPU. 

Alem de todas as placas disponiveis para 
expansao, voce tern ainda a garantia da 
tecnologia DIGITUS. 

Conhega o DGT-AP nos enderegos abaixo 
e nos revendedores autorizados DIGITUS. 
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Na continuagao deste artigo, o autor descreve as areas da ROM relativas 
ao uso de drives, cartuchos, E/S e a estrutura da memoria RAM. 



A memoria do Color (II) 



.Celso Bressan. 



Na primeira parte deste artigo, 
publicado em MICRO SISTE- 
MAS n ? 50, vimos as variiveis 
do sistema e o mapa da memo- 
ria da ROM do BASIC e do Extented 
Color BASIC. Nesta segunda, e ultima 
parte, veremos as informacSes sobre as 
memorias ROM de disco e cartucho, as 
localizacSes de entrada e saida e, como 
foi prometido, as possibilidades de ex- 
pansao da mem6ria do Color Computer. 

ROM DE DISCO 

Esta ROM e opcional e vem junto 
com o controlador de disco. Ocupa 
aproximadamente seis Kb, desde o ende- 
reco C000 ate D800 e realiza todo o tra- 
balho com disquetes. 



BYTE 


CONTEUDO 


cooo 


Identificacao "DK" 


C004 


Endereco da rotina de entra- 




da e saida (DSKCON) 


C006 


Endereco da tabela de para- 




met ros para opera^ao 


C008 


Inicializacao do disco 


C0D4 


Warmstart de disco 


C17F 


Tabela do vocabulario de co- 




mandos 


C1DB 


Tabela de endere^os dos co- 




ma ndos 


C201 


Tabela do vocabulario de 




funcoes 


C214 


Tabela de endere^os das 




funcoes 


C24D 


Processamento de erros 


C278 


Tabela de erros de disco 


C468 


OPEN de disco 


C6C2 


KILL 


C8A4 


Processa o nome do arqUivo 



BYTE 


CONTEUDO 


C932 


SAVE 


C98B 


MERGE 


C99A 


LOAD 


CA3B 


Fecha um arquivo 


CBCF 


DIR 


CD1A 


CVN 


CD28 


MKN$ 


CD 36 


LOC 


CD5B 


LOF 


CDCO 


FREE 


CDE9 


DRIVE 


CE8C 


SAVEM 


CEE5 


LOADM 


CF3F 


RENAME 


CF8A 


WRITE 


CFEO 


FIELD 


D025 


RSET 


D026 


LSET 


D080 


FILES 


D146 


UNLOAD 


D175 


BACKUP 


D2CC 


COPY 


D3FF 


DSKIS 


D474 


DSKOS 


D4AB 


DSKINI 


D6SB 


VERIFY 


D66C 


DSKCON 


D6C5 


Restore 


D705 


Le* ou Grava um setor 



CONTROLES DE ENTRADA 
E SAIDA (INPUT/OUTPUT) 

Sao constituidos por 256 bytes que 
va*o de FF00 ate FFFF, e realizam basi- 
camente tres tipos de tarefas: 



CARTUCHO (ROM -PACK OU 
CARTRIDGE) 

Ocupa exatamente as mesmas posi- 
cdes do disco, desde COOO, podendo, 
porem, ir ate FEFF. Portanto, o cartu- 
cho nSo pode ser usado com disco e 
vice-versa. Uma caracterfstica interes- 
sante destas ROM: elas permitem im- 
plementar qualquer especie de programa 
que pode inclusive ser gravado em casa 
com equipamento adequado. 



BYTE CONTEUDO 

FF00 Entrada e saida fisica 

FF00 Bit 0: Linha 1 do teclado e 

botao do joystick direito 
Bit 1 : Linha 2 do teclado e 
botao do joystick esquerdo 
Bits 2-6: Linhas 3-7 do te- 
clado 

Bit 7 : Comparacao do joys- 
tick 

FF01 Bit 0: Sincronia horizontal 

de63,5 ms 

Bit 1 : Entrada de interrupcao 
Bit 2: Normalmente 1 
Bit 3: Seleciona byte menos 
significativo do MUX 
Bits4-5:Sempre 1 
Bit 6:Nao usado 
Bit 7: Interrupcao de sincro- 
nia horizontal 

FF02 Bits 0-7: Colunas 1-8 do te- 

clado 

FF03 Bit : Sincronia de 1 6,67 ms 

Bit 1 : Entrada de interrupcao 
Bit 2 : Normalmente 1 
Bit 3: Seleciona byte mais 
significativo do MUX 
Bits 4-5 :Sempre 1 
Bit 6:Nao usado 
Bit 7: Interrupcao de sincro- 
nia 

FF20 Bit 0: Entrada de cassete 

Bit 1 : Saida de RS 232 
Bits 2-7:6 bits do conversor 
Digital /Analogico 

FF21 Bit 0: Entrada do status do 

RS232 



BYTE 


CONTEUDO 


. 


Bit 1: Entrada de interrupcao 




Bit 2 : Normalmente 1 




Bit 3: Motor do cassete 




Bits 4-5 :Sempre 1 




Bit 6:Nao usado 




Bit 7 : Interrupcao do status 


FF22 


Bit : Entrada de dados RS 




232 




Bit 1 : Sai'da de som de I bit 




Bit 2: 




Bit 3: Controle de video (0 - 




Color Set 0;1 - Color Set 1) 




Bits 4-6: Modo Grafico 




Bit 7: - Alfanum^rico; 1 - 




Grafico 


FF23 


Bit : Controle do cartucho 




Bit 1 : Entrada de interrupcao 




Bit 2: Normalmente 1 




Bit 3: Habilita som de 6 bits 




pelo conversor D/A 




Bits 4-5 :Sempre 1 




Bit 6:Nao usado 




Bit 7: Interrupcao do cartu- 




cho 


FF40 


Bit 0: Seleciona Drive 




Bit 1 : Seleciona Drive 1 




Bit 2: Seleciona Drive 2 




Bit 3: Motor do disco 




Bit 4:Precomp 




Bit 5 : Dupla denstdade 




Bit 6 : Seleciona Drive 3 




Bit 7 : Habilita par a da 


FF48 


Status do disco 


FF49 


Numero da trilha 


FF4A 


Numero do setor 


FF4B 


Dado a ser gravado ou lido 


FFC0 


Controle da apresentacao gra- 




fica no video: sao pares de 




chaves que so aceitam grava- 




cao: a do endereco par desli- 




ga e a do l'mpar liga a fun- 




cao que implement am 

Sao 3 pares que designam o 


FFC0-FFC5 




modo de apresentacao grafi- 




ca no video 


FFC6-FFD3 Sao 7 pares que representam 




um endereco de memoria on- 




de estab as paginas a serem 




mostradas no video. Deve ser 




multiplo de512 bytes 


FFD4-FFD5 £ 1 pax que designa a pagina 


FFD6-FFD9 Sao 2 pares que indicam a 




velocidade do processador 


l-r-DA-H-UDldem, para o tamanho dame- 




mora 


FFDE-FFDF 1 1 par que seleciona o ban- 




co de memoria: ou ROM ou 




RAM de 64 Kb 


FFF2 


Conjunto de 8 enderecos que 




sao os vetores de interrupcao 


FFF2 


Interrupcao por software 3 




(SWI3) 


FFF4 


Interrupcao por software 2 

(SW12) 

Fast Interrupt Request 


FFF6 




(FIRQ) 


FFF8 


Interrupt Request (IRQ) 


FFFA 


Interrupcao por software 




(SW11) 


FFFC 


Interrupcao nao mascaravel 




(NMI) 


FFFE 


Reset 
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USUARIOS DE DISCO 

Todas as describes feitas ate agora 
sao validas somente para os sistemas que 
n5o possuem unidades de disco. Para os 
outros, a unica modificacSo que ocorre 
e aquela realizada com a insercao entre 

MICRO SISTEMAS, Dezembro/85 




Figura 1 

a Area de Video e a de GraTicos de Alta 
Resoluc^o, de uma Area para Manipula- 
cSo de Disco, compreendendo: 



BYTES CONTEUDO 

600-7FF 2 buffers de 256 bytes 

cada, para entradas e sai'das 

800-BFF Area de uso do Disk BASIC 



Se durante a execucao de um progra- 
ma forem abertos mais do que dois ar- 
quivos, ao mesmo tempo, sera necessi- 
rio fazer-se uma pre-alocacao de 
buffers adicionais de 281 bytes para 
cada arquivo, deslocando, portanto, 
mais ainda a Area de Graficos. 

EXP AN SAO DA MEMORIA 

Ate agora, vimos que o usuario pode 
dispor de ate um maximo de 32 Kb de 
memoria RAM, pois do total possivel 
admitido pelo enderecamento do 6809, 
64 Kb, metade esti reservada para as 
ROM do BASIC, Extended BASIC, etc. 
Sabemos, entretanto, que e possivel 
con tar com mais memoria. O que acon- 
tece entao? 

Vamos por partes. 

De uma olhada na figura 1 . Veja que 
existe um banco de memoria que vai de 
ate 32 Kb, a seguir, outro banco com 
as ROM, de 32 ate 64 Kb, e ao lado 
deste, outro banco, agora de RAM, que 
vai tambem de 32 ate 64 Kb. Aparente- 
mente existe uma incoerencia, pois dois 
pedacos diferentes de memoria s3o aces- 
sados pelo mesmo endereco. Voltando 
atras, e consultando os controles em 
FFC0-FFDF, poderemos estabelecer a 
necessaria diferenciacao. Existe um de- 
les, precisamente o par FFDE-FFDF, 
que informa qual o banco que esta em 
uso. Se for o primeiro, todas as referen- 
cias de endere90 entre 32 e 64 Kb v3o 
para as ROM; se for o segundo, sera 
usada a RAM. 

Portanto, \i e possivel utilizar-se 
ate 64 Kb de RAM sem ambiguidades, 

» 




CP500/M? 
uma grande 

decisao 

para homens 

que tomam 

decisoes. 

O CP 500/M 80 agora tambem 
e compativel com o CP/M, o Sistema 

mais difundido no mundo. Isso 
significa que, somando o tradicional 

DOS 500 com o CP/M, voce 

passa a dispor da maior biblioteca de 

programas aplicativos do 

mercado. E voce podera tirar vantagens 

de programas como Calc Star*, 

dBase II*. Word Star* e muitos outros, 

que vao agilizar tanto 

sua vida quanto a de sua empresa. 

Para voce, executivo, 

o CP 500/M 80 e uma poderosa 

ferramenta de auxiiio a 

decisoes gerenciais, com programas 

especificos em sua area de 

atuacao, como anaiise de fluxo de caixa, 

controles de compras/custos/ 

estoques e administracao financeira. 

Como resultado final, sua 

empresa tera grandes ganhos de 

produtividade e eficiSncia. 

CP 500/M 80 , um grande passo na 

informatica com a Qualidade CP 

e a Tecnologia Prol6gica. 



Caracterisiicas 



Mem6ria RAM 
Mem6ria ROM 
Compatibilidade 
Video 



Sisiemas Opcracionais Inclusos 



SO-08 
64 Kbytes 
2 Kbytes 
CP/M* 
80 colunas 
por 24 linhas 



DOS 500 
48 Kbytes 
16 Kbytes 
TRS-DOS 
64ou32 
colunas por 
16 linhas 



Video 12" fosforo verdc com controle de 

intensidade 

Teclado profissional capacitivo com numerico 

reduzido 

Interface para impressora paralela 

Opera com 1 ou 2 drives de face simples ou dupla 

Acesso a toda a Rede Nacional de Telematica. 

airaves de Interface serial padrfio RS-232 C 

(opcional) 



1 Marcas Regisliadas 




TECNOUDGIA 
PROLCOCA 



A MEM6RIA DO COLOR(II) 



mas da seguinte forma: se o programa 
que estiver em uso naquele momento 
no microcomputador for escrito em 
Assembler, este, ao entrar (naturalmen- 
te, no banco de memoria de 0-32 
Kb), se preocupara em posicionar FFDF 
convenientemente, passando entao a dis- 
por de 64 Kb, como se fosse um banco 
unico. Ao sair, reposiciona FFDF e 
tudo volta ao normal com o BASIC. 

Se, entretanto, o programa for em 
BASIC, as coisas se tornam mais com- 
plicadas. Num determinado momento, 
pode ser a ROM do BASIC que esteja 
em uso; no seguinte, pode ser a RAM 
(para consulta e tratamento de varia- 
veis) e assim por diante. Para trabalhar- 
se desta forma, hi que se posicionar e 
desposicionar FFDE-FFDF, num vai- 
vem sem fun. Desta forma, muito mais 
tempo serd perdido nesta tarefa do que 
na execucSo do programa propriamente 
dito. 

A solucao, neste caso, consiste em 
rodar um programa que copie toda a 
ROM para a RAM, desabilitando aquela 
em seguida. Esta tarefa pode ser feita 
logo apos ligado o micro, para deixa-lo 
pronto para uso normal. Os procedimen- 
tos que este programa executa sSo os 
seguintes: le um byte, a partir de 8000 
(hexadecimal); habilita a RAM e arma- 




nTENCROi 

EMPRESAS 
SOFTWARE-HOUSES 
CENTROS DE INFORMACAO 

WHO I.IIUIM ESTE RNUNCIO SE 
OUISIEREM CONTIHUnR nTRHS 

RDDRESS * 

VIDEO 

COMPUTER 

CONNECTION 

EDICnn EM VtDEQCRSSETE 
-»CURSOS E TREINRMENTOS 
-»PnLESTRRS ILU3TRRDRS 

-»VPll IN3TITUCI0NRIS 
-EVENTOS 

EDICAO COMPUTADORIZADA 
COM OS MAIS MOOERNQS 
RECURSOS DE ANIMAQAO 
DIGITAL. 

IDEAL PARA TREINAMENTOS 
CONSTANTES EM EMPRESAS 
OU CURSOS A DISTANCIA. 

METODO VIDEOTERCH * * 

RDDRE^JS* 

Video Computer Connection 
CENTRAL DE INFORMACOES 
Oil 211-5348 » Oil 212-0370 



RAH 



ROH 



RAM 



0Kb 



32Kb 



■ - 64Kb 



Ftgura 2 

zena este byte, tambem a partir de 8000 
e habilita novamente a ROM, lendo o 
proximo byte, e assim por diante, ate o 
fim da memoria. 

Importantes conclusSes podem ser 
tiradas. Primeiro, nem todos os 64 
Kb podem ser usados, pois no minimo 
16 Kb foram gastos pelo BASIC. Segun- 
do, a memoria n5o e continua, indo 
de 0-32 Kb, e depois de C000 ate o 
fun (sem disco nem cartucho), muito 
embora este problema ja possa ser con- 
tornado por outro programa que trans- 
porte todo o BASIC para a parte mais 
superior da memoria, deixando mais 
ou menos 40 Kb livres com graficos, 
47 Kb sem estes e 55 Kb se nao preci- 
sarmos do Extended BASIC. Terceiro, 
toda vez que desiigarmos o micro de- 
vemos reinicializa-lo. Vale a pena? De- 
pende das necessidadesja que 64 Kb per- 
mitem o uso de outras linguagens como 
por exemplo Pascal, C, FORTRAN e 
outras, bem como os poderosissimos 
sistemas operacionais OS-9 e FLEX. 

As ampliacOes de memoria acima de 
64 Kb, sempre realizadas em banco de 
32 Kb, funcionam de forma semelhante. 
De uma olhada na figura 2. Foram colo- 
cados mais dois bancos de 32 Kb, tota- 
lizando uma memoria de 128 Kb (com 
a ROM fica quase 160 Kb), porem ago- 
ra, os enderecos de cada banco vao de 
ate 32 Kb, porque, do contrario, teria- 
mos que carregar o BASIC em cada um 
deles. Por isso precisamos estar bem 
conscientes de uma coisa: o 6809 nao 
endereca mais do que 64 Kb. Portanto, 
usando um banco ou outro qualquer, 
a combinacao deles n5o pode ultrapassar 
esse limite (este raciocinio e igualmente 
valido para qualquer micro de 8 ou 16 
bits). 



O uso de 128 Kb, embora nao con- 
tinue nos leva a um outro ni'vel de tra- 
balho, qual seja, a possibilidade de en- 
volvimento com ate tres programas di- 
ferentes ou iguais, ao mesmo tempo, 
bastando, para isto, selecionar determi- 
nadas chaves que estSo contidas nos by- 
tes de controle, desde FFOO ate FFBF. 
Numa elaboracao mais complexa, pode- 
ria ser montado um programa monitor 
que simularia a existencia de 1 28 Kb pa- 
ra um unico programa, fazendo o ne- 
cessario chaveamento. Isto certamente 
acarretard atrasos no processamento, 
porem, dependendo da aplicacao, este 
problema poderd ser ate ignorado. Quern 
sabe se no futuro nSo sera possivel 
executar tres programas, um para cada 
usuario diferente, remotamente? Tudo e 
possi'vel com este ilimitado micro! 

Finalmente, ainda nos resta conside- 
rar que, em princi'pio, nao ha limitaclo 
fisica de expansao de memoria. Contu- 
do, a partir de um determinado ponto, 
os incrementos comecam a se tornar 
muito caros e a logica eletronica para 
controle fica tSo lenta, que e mais 
vantajoso o uso de um acionador de 
discos flexi'veis ou mesmo de unidades 
de disco Winchester, de alta capacidade 
e rapidez, ja disponiveis para o Color. 

Enfim, nSo custa repetir, temos em 
nossas maos um instrumento sem fron- 
teiras! 



Celso Bressan 6 formado em Engenharia Ele- 
trdnica e possui o curso de pds-graduacao em 
Sistemas de Informacao pela UFRGS. Traba- 
Iha em processamento de dados, desde 1969. 
e atualmente 6 Analista de Sistemas na Funda- 
cao Metropolitans de Planejamento, em Porto 
Alegre. 
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CONTINUAMOS RENOVANDO 
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A mais completa linha de Software para o 
Color Computer CR 400, Color 64, MX-1600 
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PR0M0QA0 DE FERIAS 

Fitas com dois programas 

Selecao de alguns dos melhores "games" agrupados dois a dois. 



PR.001 • Zaxxon/Buzzard bait 
PR.002 • Draconian/8 ball 
PR.003 - Speed racer/Bag-man 
PR.004 • Galagon/Demon seed 
PR.005 • Space wreck/Sea dragon 
PR.006 • Sanctum/R-ball 
PR.007 • Sea quest/Quix 
PR.008 • Calixto island/Pooyan 



PR.009 - Lunar rover/Devil assault 
PR.010 • Time patrol/Moon shuttle 
PR.011 • Canyon climb/Fly tiger 
PR.012 • Decathlon/Cashman 
PR.013 • Color car/Kron 
PR.014 - Rat/The king 
PR.015 - Cristal/Doodle bug 
PR.016 • Time bandit's/Tut's tomb 



PR.017 - Time tighter/Moon hopper 
PR.018 • Mudpies/Death trap 
PR.019 • Crash/Ranger 
PR.020 • Color panik/Shenanigans 

ATENCA0: • qualquer fita acima 40.000. 

- as fitas acima nao sofrem desconto 
de qualquer esp6cie 



Solicite nosso catalogo com mais de 300 produtos 



RECORDISTAS DE VENDAGEM - 1985 



E006 
PP002 
PJ011 
PJ005 

E006 

PJ051 
PJ039 
PJ018 
PJ065 
PJ058 
PJ059 
PJ071 



WORLD'S OF FLIGHT- Simulator devto 50.000 

CYRUS- Para amantes do logodexadrez 35.000 

ZAXX0N - Enlrenie os pengos de uma plataforma espacial 35.000 

CRISTAL • Sensacional - eslilo Pac-Man em 3D 35.000 
SAILOR • Derate o Brutus e conquiste o coracao da Olivia. 3 telas. 9 niveis de 

dificuldade 35.000 

SPEED RACER - Corrida de caros (tipo Hipper) 35.000 

DRACONIA - Salve os prisioneiros do espaco e fuja do dragSo 35.000 

BUZZARD BAIT • Ataque os p^ssaros com sua lanca 35.000 

GALAGON - IdSntico ao Fantastic do Hipper 35.000 

QUIX • Iddntico ao do Hipper. Preencha 75% da tela sem ser atingido 35.000 

DECATHLON- 10 provas olimpicas 35.000 
SPACE WRECK - Defenda sua base espacial do ataque inimigo. 3D com naves 

estilizadas 35.000 



Para programas em disco, acrescer 
60.000 por programa (Disco + Embalagem) 



PD001 CALIXTO ■ Ajude o arquedlogo (Prof. Lagarto) a recuperai o tesouro 

PD003 SEA QUEST Recupereo tesouro perdido 

PD004 BLACK SANCTUM- Exorcize odemdmo 

PJ023 DEMON SEED - Destrua pdssaros, sementes e naves 

E002F MUSICA 2 - Para compor, arranjar. copiar partituras etc 

PU008F SUPER SCREEN • Aumenta o tamanho da tela (52 colunas, 24 linhas). Acrescenta 

funcoes diversas 
PA002F ELITE CALC - Planilha eletronica. Ate 255 linhas e colunas. Manipula textos, niimeros 

etc Emite graficos e permite ordenar colunas e linhas. Manual em portugues 
PL001F EDTASM • Linguagem Assembler 
PL005F COLOR LOGO- Linguagem educativa logo 
PA007D PRO COLOR FILE ■ melhor banco de dados ja cnado para o color. Somente em 

disco (preco mcluso) 
PA006F TIMS/SIGA • Banco de dados que permite criar ate 8 campos. Manual em port. 



•JOGOS SO PARA DISCO 
(preco c/disco incluso) 



OUTROS PROGRAMAS 



PS003D 
PD005D 
PD008D 
PD009D 

PD010D 
PD011D 



PS002D EAGLE - Simula um voo espacial em que voce deve aportar e levantar voo da lua 
ou de marte. Manual em inglfes. Requer 2 Joysticks 
THE FACTORY - Crie a linha de moniagem de uma fabrics e teste a sua memdna 
SANDS OF EGYPT - Descobrir o misteno da tumba do Farad 
CRIME - Desvende o misterio de um crime. Alinal, vocfi e o detetive 
MAJOR ISTAR • Viaiando atraves das cidades submarinas do seculo21, vocS devert 
desvendar o misteno de Trident 
SAM SLEUTH • Desvende o misterio de um desaparecimento 
STAR TRADER ■ Mercador das galixias 

• GRAFICOS 
ARTGRAF-CnadopelaMicromaq.Necessita64K.Trabalhacom8telassimultaneas 
na mem6ria no mais aito modo grafica PG004F 

PG004D 
VIZIDRAW - Muito potente para desenhar. Acompanha o Vizidump, que leva suas 
telas para a impressora PG005D 

ART GALERY - Potente gerador de graficos e telas de desenho PG002F 

• SOM, S1NTETIZACA0 
COLOR QUAVER • Para compor, arranjar, copiar partituras. monta espectro, cria 



ondas etc 



EDUCATIVOS 



TABELA PERIODICA DE OUiMICA 

MAPA MUNDI - Desenha na tela Mapa Mundi, Ortografico ou Polar 



PM003F 
PM003D 



PE012F 
PE012D 
PE013F 
PE013D 



90.000 
90.000 
90.000 
90.000 

90.000 

90.000 
90.000 



200.000 
260.000 

300.000 

150.000 



160.000 
220.000 



40.000 
100.000 
40.000 

100.000 



• APLICATIVOS P/FITA 
WRITER II • Tela de ate 85 colunas, "Window" do texto com a forma final. Permite 
insercao de caracteres em porlugufis (na imp.). Mais de 100 funcoes PA001F 
MALA POSTAL (I) - Totalmente criado no Brasil. Emite etiqueta, relatorio e lista 
telefonica PA013F 

ASTROLOGIA ■ Gerador de mapas astrologicos PA017F 

HANDY MAN - Auxiliar no calculo de custos de obras civis, calculo de areas. 
coberturas etc. PA030F 

STATGRAF • Estatistica. Gera graficos com regressSo linear, medias, desviosetc 

PA021F 
• APLICATIVOS P/DISCO 
VIP WRITER- Idem aoPAOOlF 
VIP DATABASE- Banco de dados 
MATHMENU • Sistema para auxilio no estudo da matematica 
DYNACALC • Planilha eletrftnica. Gera graficos em alta resoluca"o 
ELCIRCAN ■ Analisador de circuitos eletricos 
STATGRAF- Idem aoPA02lF 

• UTILfTARIOS EM FITA 
VDOS - Simula o sistema operacional de disco em fita 
FAST TAPE ■ Dobra a velocidade de leitura e gravacSo para cassete 
COLOR KIT- Ferramenta muito potente para trabalho com a memoria. Acrescenta 
mais 30 func6esao Color. PU019F 

• UTILITARIOS EM DISCO 

ADOS ■ Sistema de DOS. mais utilizado atualmente. Cria novas lunches PU001D 

CBASIC COM PI LER ■ melhor compllador ate o momenta Compi la tudo E003D 

COLOR KIT- Idem PU019F PU019D 

VIP DISK ZAP • Altera todo o conteiido de um disco PU020D 

WHERE IS IT ? • Gerenciador de diretdrios. Autcvexplicativo PU018D 



PA001D 
PA015D 
PA029D 
PA011D 
PA028D 
PA021D 

PU013F 
PU014F 



Desconto 



Desejo recatMt o<s) segulntets) programa<S), pel«si qu»Hls) pagarel a quintla de Crt 



at6 150.000 

de 151.000 a 250.000 

de 251.000 acima 



sem desconto 

5% 

10% 



PROGRAMAS: 

NOME 

ENO: 



CKMOE 



Para lal, estou envlando ( ) cheque ( ) Vale Postal A MICROMAQ LIDA 
Rua Sele de Selemtvo. 92 - LJ. 106 CEP 200SO - Rio de Janeiro - RJ. 
Desoesas de correio incluldas. 



ATENQAO: So serao aceitos os pedidos com postagem ate 31/01/86. 



35.000 
35.000 
35.000 
35.000 
140.000 

100.000 

150.000 
150.000 
180.000 

270.000 
130.000 



A GRANDE SENSACAO 

COLOR MAX (modulo de a Ita-resol ucao) • Reproduz no color com 64K a perfor- 
mance grafica apresentada pelo Macintosh, imitando as funcoes do MacPaint. 
Utiliza tecnicas modemas de programacao tipo "Icons" e "Pulldown Menus". 
Composto de placa de Hardware e programa em fita ou disco E001 F 14 ORTN 

(Para calculo de ORTN considerar a data da postagem) E001D 15 ORTN 



200.000 

160.000 
150.000 

35.000 

160.000 

260.000 
260.000 
220.000 
260.000 
220.000 
220.000 

120.000 
130.000 

160.000 

220.000 
320.000 
220.000 
320.000 
150.000 



iniciante 



Demonstrar algumas rotinas basicas 

para tragar graficos, adaptando-as a 

varios micros e a proposta deste artigo. 

Pierluigi Piazzi 



Graficos simples 



H alley (o astronomo), sempre foi 
uma das pessoas que mais inve- 
ja me causou. N5o pelo fato de 
ter seu nome eternizado num 
cometa (afinal, o da minha famflia estS 
em nada menos que duas crateras da 
lual), mas pelo fato de ter vivido uma 
das transi?5es mais importantes da his- 
toria intelectual da humanidade: a Era 
de Newton. 

A revolu^So que Isaac Newton pro- 
vocou no mundo da ciencia e do calculo 
foi tao gigantesca, tSo radical e tSo defi- 
nitiva que so poderia ser comparada a 
que Einstein produziu no comedo do 
nosso se'culo. Isto, na drea da Ciencia, 
pois no que se refere ao Calculo tivemos 
que esperar a segunda metade deste 
seculo para que surgisse o computador. 
computador pessoal, entao, so surgiu 
nos ultimos anos e esta produzindo mu- 
dancas intelectuais tSo grandes que 
podem ser comparadas as que os con- 
temporaneos de Halley sofreram. 

Por exemplo, ha menos de 20 anos 
(que afinal de contas na"o e tanto tempo 
assim), eu dava aula de regua de calculo 
(hoje, peca de museu!). Diga-se de pas- 
sagem que 'ainda uso regua de calculo 
e o fato dela nao fornecer virgula deci- 
mal me obrigou a desenvolver uma tSo 
grande habilidade em estimar ordens de 
grandeza que causa inveja ate hoje nos 
meus alunos (ta"o "digital izados", coita- 
dos). 

Nesta epoca, eu trabalhava num la- 
boratorio de pesquisa e era obrigado a 
fazer diariamente cdlculos de alta 
precisao. Para espanto dos leitores mais 
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jovens, comunico que as maquinas de 
calcular daquela epoca so somavam e 
subtraiam! 

A multiplicacao era um processo 
penoso de multiplas adi96es;e a divisSo, 
enta"o, nem se fala! Era mais rapido usar 
uma tabua de logaritmos (outra coisa, 
utilissima, que se tornou pe?a de 
museu em menos de uma gera^ao). 

A S0IU920 era o uso de mais uma 
pe?a de museu: a heroica FACIT a mani- 
vela! Sim senhor, maquina de calcular 
a manivela, girando para frente e para 
tras, esperando o toque de um sininho 
que avisava quando o resto era menor 
que o divisor. 

Nao preciso dizer com que alegria 
foram recebidas as primeiras maquinas 
eletronicas, que faziam ate divisbes e 
determinavam automaticamente (mara- 
vilha suprema!) a posica"o da virgula. A 
regua de calculo, porem, so foi definiti- 
vamente aposentada quando surgiram as 
calculadoras ditas "cientfficas", nas 
quais podiam ser resolvidas equa?5es 
trigonometricas e exponenciais. Ironi- 
camente, estas primeiras maquinas eram 
chamadas de "reguas de calculos eletro- 
nicas..* 

passo seguinte foi o surgimento das 
calculadoras programaveis, verdadeiros 
microcomputadores portateis. Computa- 
dores rudimentares, e verdade, mas 
vanguarda da revolucSo que viria um 
pouco mais tarde: os micros pessoais. 

A famosa HP-41 foi um impacto. 
Afinal de contas, nao so armazenava 
programas, como tinha ainda um dis- 
play alfanumerico. 



Puxa vida! Sabe la como e importan- 
te voce escrever seu proprio nome e 
ve-lo reproduzido eletronicamente?! 

A gloria final, porem, so aconteceu 
quando os processadores eletronicos fo- 
ram ligados is telas de TV. Na"o so o 
usuario de um Apple, TRS-80 ou Sin- 
clair podia escrever como tambem de- 
senhar, visual izando atraves de graficos 
as funcdes matematicas (ate este mo- 
mento meras abstra^Oes ocultas no 
meandro dos circuitos). 

Lembro-me ate hoje a alegria com a 
qual vi funcionar um programinha que 
elaborei num TK 82C (sem SLOW!), 
que mostrava os pulos de uma bolinha 
contra o ch5o, em fun?a"o do coeficien- 
te de restituicSo (este programa, alias, 
foi publicado na MICRO SISTEMAS 
n ? 12, em setembro de 1982). 

Produzir um grafico, porem, nao e 
uma tarefa muito simples pois nenhum 
fabricante de computadores de pequeno 
porte preocupou-se ate hoje em elabo- 
rar um sistema operacional com grandes 
facilidades, neste sentido. 

Digamos, por exemplo, que o leitor 

deseja produzir o cldssico grafico das 

oscilacSes amortecidas. Neste caso, voce 

tern uma mola (como a da suspensSo de 

um automovel) ligada a um amortece- 

dor e quer estudar as amplitudes das os- 

cilacSes que o sistema sofre, para cima 

e para baixo, com o correr do tempo. 

A equa?So que relaciona o deslocamen- 

to vertical (Y) com o tempo (T) e a ilus- 

tra9So que corresponde a situa9ao des- 

critae': pt , _ 

Y=e L[ sen(K.T) 

MICRO SISTEMAS. Dezembro/85 



10 


INPUT 
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29 


INPUT 


K 














39 
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FOR 1 


=e to 


H 












5« 


LET T 


■v/z* 


!8»(V/2) 


• EXP< 


-C"T> 


•5IN<K 


T) 


60 


1 
















76 


NEXT 


' 










• 





Figura 1 




onde C e um parametro ligado a viscosi- 
dade do 61eo no amortecedor e K e* um 
numero diretamente proporcional a fre- 
qiiencia de vibra^ao da mola, ligado por- 
tanto a sua elasticidade. 

Variando CeK, voce pode estabele- 
cer o par de valores ideal para uma dada 
suspensSo, de maneira que ela nSo seja 
dura demais ou entao nSo oscile a ponto 
de provocar enjoo. 

Para isso, voce deve visualizar o com- 
portamento do conjunto para varios 
valores e combina9<5es de C e K. 

Isto pode ser feito construindo-se o 
grafico Y = f (t), na tela de seu compu- 
tador. Obviamente, cada micro tern suas 
caracten'sticas, mas podemos escrever 
um programinha generico que sera al- 
terado em fun93o do microcomputador 
no qual esta sendo digitado (figura 1). 

Neste programa # , H, V, S e & de- 
vem ser substituidos pelo que esta indi- 
cado na figura 2. 

No MSX, por exemplo, este progra- 
ma ficara como mostra a figura 3. Ja no 
CP-400, antes de roda-lo, de o coman- 
do direto PCLS para limpar a tela de al- 
ta resolu95o. 

programa pede dois valores (INPUT 
C e INPUT K), antes de com^ar a dese- 
nhar o grafico. 

Um valor inicial aconselhavel esta 
relacionado na tabela da figura 2, mas 
obviamente voce dever£ rodar o progra- 
ma outras vezes com outros valores de 
CeK para perceber as correspondentes 
varia90es no comportamento da suspen- 
sSo. 

A resolu9§o do grdfico depende do 
computador: no TK85 (figura 4) obte- 
mos um grafico mais grosseiro do que 
no TK90X (figura 5). 

Colocando um STEP .1 na linha 40, 
voce torna o programa muito mais 
lento, mas faz com que o grafico fique 
mais denso (figura 6), melhorando, as- 
sim, seu aspecto. 

E claro que depois de brincar um 
pouco com este programa, voce vai co- 
me9ar a introduzir altera9<3es e melho- 
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^imbolo 
programa 


Signt f icado 


APPLE 


CP400 


MSX 


TK90X 


SINCLAIR 


* 


Coloca a tela no 

modo de alta 

resolui;ao 


HGR 


PMODES: SCREEN 1 ,1 


SCREEN2 


REM 


REM 


H 


Numero de pontoB 
na horizontal 

(-1 ) 


279 


255 


255 


255 


63 


S 


Slnal que ajusta a 
orientagao do 
eixo vertical 


-1 


-1 


-1 


♦ 1 


1 


V 


Numero de pontos 
na vertical 
l-t) 


159 


191 


191 


175 


43 


• 


Comando para 
"plotar" os pontos 


HPLOT T,Y 


PSET(T,Y) 


PSETIT.YI 


PLOT T,Y 


PLOT T,Y 


c 

K 


Constantes ligadas 
ao amortecimento (C) e 
a elasticidade da 
□ola IK) 


.01 
.1 


.01 
. 1 


.01 
. 1 


.01 
. 1 


.05 
.5 



Figura 2 



1* 


INPUT C 










2* 


INPUT K 










30 


SCREEN 2 










** 


FOR T-» TO 23S 










se 


LET r-191/2.<-l> 


(191/2) 


■ EXP I 


-C«T>«SIN<K"T> 


6e 


PSET(T.Y) 










7* 


NEXT T 











Figura 3 
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Figura 4 
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Figura 5 



:o :ncyT : 

20 INPUT ' 
30 OEM 

AO FOB T«0 TO 255 STEP .1 
50 LET V.159 -2*'.i> ♦ 15? 2' 
i-C*Ti»5IN lK»T1 
60 PLOT T.Y 
70 NEXT T 



A 



A 



v/ 



Figura 6 



ramentos. Ele e apenas um come9o: o 
limite final depende apenas de sua cria- 
tividade e imagina9So! 

Observa9ao: Os programas citados 
neste artigo foram testados nos seguin- 
tes equipamentos: APII TI, da UNI- 
TRON; EXPERT (MSX), da GRADIEN- 
TE; TK85 e TK90X, da MICRODIGI- 
TAL e no CP400, da PROL0G1CA. 



Pierluigi Piazzi 6 formado em Quimica e Ffsi- 
ca pela USP. ex-Professor do curso Anglo Ves- 
tibulares e ex-Diretor Editorial da Revista Ml- 
crohobby Atualmente 6 Diretor da Aloph Pu- 
blicacdes. 







UAlK^T.Mtf 


• Microcomputadores Pessoais 

e Profissionais, Software, Suprimentos 
e Cursos. 

• Financiamento em ate 18 meses sem 
entrada e os precos mais baixos do 
mercado 

• Atendimento perfeito, profissionais 
treinados e habilitados para dar a voce 
a certeza de um bom Investimento 


EQUIPAMENTOS 

Micros das linhas: TRS-80 • Apple • 

IBM •Sinclair* TRS-80 Color 
Impressoras • Videos • Interfaces •Etc. 


SUPRIMENTOS 

Formulario Continuo • Disquetes • 
Fitas • Mesas • Etiquetas • Etc. 


SOFTWARE 

Nacionais e Importados mais 

de 2.000 programas e 

jogos de todas as linhas. 


CURSOS 

Basic • Basic Avangado e DOS. 


1 Av. Ataufo de Paiva, 566 
1 sobreloja 211 e 202 
■ Rio de Janeiro - R.J. 
|| Tels.: (021) 239-2798 e 511-0599 







Com este sistema, para o ZX Spectrum, voce pode submeter seus 
alunos a provas, em miiltipla escolha, de diversas disciplinas. 



Simulador de provas 



JosA Rafael Sommerfeld . 



Este 6 um sistema que tern como 
objetivo simular a aplicacao de 
uma prova, em miiltipla esco- 
lha, permitindo ao pai ou pro- 
fessor passar ao micro determinadas nor- 
mas de comportamento durante sua 
aplicacao, tais como numero de chances 
a serem dadas ao aluno e mensagens a 
exibir, entre outras. 

Desenvolvido em BASIC para o 
TK90X (versdes 16 ou 48 Kb), o siste- 
ma e composto de dois programas, po- 
dendo ser facilmente adaptado para ou- 
tros micros. Acompanhando o fluxo 
apresentado na figura 1 , veremos como 
ele funciona. 

O primeiro programa (chamaremos 
de Preparacao) permite ao educador for- 
mular a prova, ou seja, nesta etapa sera 
informado o numero de questoes da 
prova, o numero de respostas por ques- 
tao, o numero de chances por questao, 
as mensagens que serSo dadas ao aluno 
durante sua aplicacao e o conteudo das 
questoes (pergunta, resposta e numero 
da resposta correta). Apos informar os 
dados da prova, o educador entao pode- 
ra" gravd-la em fita para posterior leitura 
pelo programa responsdvel por sua apli- 
cacao. Ainda nesta fase e" dada como en- 
trada opcional a leitura, a partir de fita, 
de uma prova anteriormente elaborada, 
para possfveis mudancas nas questoes 
que o educador desejar. 

O segundo programa (Execucao) per- 
mite ao aluno fazer a prova, ou seja, per- 
mite a leitura da prova gravada em fita, 
aplicando-a ao aluno e, ao final, exibin- 
do os resultados obtidos. 

Vale mencionar que o sistema foi de- 
senvolvido em dois programas para favo- 
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recer seu uso em equipamentos de 16 
Kb, alem de inibir o acesso do aluno as 
rotinas de altera?§o da prova. educa- 
dor entao, se desejar, pode fornecer uma 
fita ao aluno contendo apenas o progra- 
ma Execucao e a Prova. 







Dados da 
Prova 












-— *• 


PREPARACjAO 


Prova 
















Prova 














EXECUCAO 


do aluno 










\ 





Resultados 
da Drova 



Figura J - Fluxo geral do sistema. 



COMO FUNCIONAM OS PROGRAMAS 

programa Preparacao inicia apre- 
sentando um menu de opcoes, que sao: 
montar prova, ler prova, mudar questao 
e gravar prova. Ao se indicar a opc,ao de- 
sejada, o programa segue para a rotina 
correspondente. Caso a prova nSo esteja 
na mem6ria, ou seja, nao tenha sido 
montada nem lida da fita, o programa 
bloqueara o acesso as rotinas Mudar a 
Questao e Gravar a Prova, retornando ao 
menu. No inicio de qualquer uma das 
rotinas, caso se deseje voltar ao menu, 
basta pressionar ENTER. 

Na rotina Montar a Prova o programa 
apresenta uma tela, pedindo a quantida- 
de de questoes, de respostas e chances 
por quest<So. Para a versSo de 48 Kb, o 
numero maximo de questoes 6 99, e 
para a de 16 Kb, este numero fica redu- 
zido - variando em funcao do nu- 
mero de respostas por questao. Neste ca- 
so, quando houver estouro no limite de 
espaco, o programa exibira uma mensa- 
gem e voltara ao inicio da rotina. A 
quantidade de respostas sera um numero 
de 1 a 5, e a de chances por questao sera 
um numero maior que zero e nao supe- 
rior a quantidade de respostas. 

Ao finalizar esta tela, o programa 
perguntard se as informac5es estao cor- 
retas. Sendo digitado N, o programa re- 
tornarf ao inicio da tela, solicitando no- 
vamente as informacoes. Caso se digite 
S, o programa prosseguira' para a tela 
posterior. Este procedimento de confir- 
macao ocorre tambem nas duas telas 
seguintes, durante a montagem da pro- 
va. 

A segunda tela permite a digitacao 
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MENSAGENS 




Respostas Corretas 


1 - 


- Muito bom, acertou na primeira; 


2 


- Acertou, mas podia ser melhor; 


3 - 


- Mais atencao. Voce quase erra. 




Respostas Erradas 


1 ■ 


- Tente acertar de novo; 


2 


- Voce esta demorando a acertar; 


3 


- Estude um pouco mais. 



Figura 2 - 
Exemplo de 
mensagens em 
uma prova 
com tres 
chances por 
questao. 



das mensagens a serem exibidas durante 
a execucao da prova. Observe alguns 
exemplos de mensagens na figura 2. Ca- 
da mensagem tern o tamanho maximo 
de 29 caracteres. Durante a aplicacao da 
prova, as mensagens serao mostradas de 
acordo com o numero de chances no 
momento. Por exemplo, na primeira 
chance, se o aluno acertar, a mensagem 
1 (das mensagens corretas) sera exibida. 
Se errar, a mensagem 1 (das mensagens 
erradas) sera exibida. 

A terceira tela permite a digita^ao, 
questao por questao, da pergunta, das 
respostas e do numero da resposta cor- 
reta. tamanho maximo da pergunta e 
de 30 caracteres. numero de respostas 



corretas devera ser maior que zero e nao 
superior ao numero de questoes. 

Ao terminar a entrada das questoes, 
o programa emite uma mensagem, 
aguardando que uma tecla qualquer seja 
pressionada para voltar ao menu. 

Na rotina Ler Prova, o programa soli- 
cita o nome da prova que se deseja ler 
da fita. Apos informar o nome, o pro- 
grama pede para que se ligue o gravador 
(posicione a fita no inicio da gravacfo 
que deseja). A leitura se fara automati- 
camente e, ao terminar, sera dado um 
aviso e solicitado que se digite uma tecla 
qualquer para voltar ao menu. Observe 
que o nome da variavel lida n3o aparece- 
t& na tela como normalmente ocorre em 



uma leitura. Isto e normal, pois o pro- 
grama foi desenvolvido para se compor- 
tar assim. Esta rotina deve ser utilizada 
apenas quando se desejar mudar o con- 
teudo de uma prova anteriormente ela- 
borada e ja gravada em fita. 

Na rotina Mudar Questao, o progra- 
ma inicia pedindo o numero da questao 
que se deseja alterar. Apos informar o 
numero, o programa exibe a questao no 
video e pergunta se sua mudanca esta 
confirmada. Se for digitado N, o progra- 
ma volta ao inicio da rotina. Se for digi- 
tado S, o programa permite a redigita- 
c3o da questao. 

Na rotina Gravar Prova, o programa 
solicita o nome que se deseja dar a gra- 
vacao da prova na fita. Apos informar o 
nome, 6 solicitada a preparacao do gra- 
vador. Deve-se entao liga-lo e digitar 
ENTER. Ao terminar a gravacao, o pro- 
grama exibira uma mensagem, pedindo 
que se pressione qualquer tecla para vol- 
tar ao menu. 

A seqiiencia geral de uso do progra- 
ma Preparacao e' a seguinte: 

1 — Ler o programa da fita; 

2 — Ler prova (opcao 2), se for desejada 
a altera?ao de uma prova ja feita; 

3 - Montar prova (opcao 1 ), se for de- 
sejada a elaboracao de uma nova prova; y> 

4 — Mudar questao (opcao 3), se for de- 3fe 



UNIMOS 
O UTIL AO AGRADAVEL 





TELEGAME 



Primeiro, veio o Telefone. Depois. a Televisao e o Video-Game. Agora, a jun0o dos Ires, deu no 

JELEGAME — uma linha direla com os seus inimigos favorilos, 24 horas por dia. 

E so ligar para a CENTRAL TELEGAME, escolher um dos 150 jogos (500, em breve) do nosso 

repert6rio e, em menos de 2 minutos, eie estara gravado no seu cartucho TELEGAME, pronto para 

jogar. Basta um unico impulso telefonico. A entrega e a mais rapida. preco mais economko que 

qualquer cartucho comum. E com o TELEGAME, voce joga quandoe com quantos jogos quiser, sem 

precisar sair de casa para trocar o joga 

E se voce quiser, em vez do jogo. voce pode receber Softwares Informativos, tais como: Receitas 

Caseiras, Retrospectiva da Loto, Farmacias de Plantao, Enderecos de Bares e Restaurantes, Cotacdes 

da Bolsa de Valores, Notfcias Economicas, etc. etc. etc... 

Peca uma demonstracao numa das Lojas OTICAS FOTO MODERNA (SP) ou OTICAS BRASIL (RJ). 

litil e o agradavel, juntos: 




TELEGAME 

„jmha unru com o ovt tnvtn*o 

Tecnologia Embracom Eietronica 



VIU NO QUE DEU? 

500 jogos num so cartucho 




SIMULADOR DE PROVAS 



sejada a altera?ao de alguma(s) questao 

(5esj; 

5 — Gravar prova (opclo 4). 

Apos digitar o programa, grave-o em 
fita com a instrucao: 
SAVE "PREPARACAO" LINE 10. 

O programa Execucao micia apresen- 
lando um menu de opcSes, que sao: Ler 
Prova e Fazer Prova. 

A rotina Ler Prova funciona da mes- 
ma maneira que a do programa Prepara- 
cao. 

A rotina Fazer Prova apresenta, uma 
a uma, as questoes, solicitando o nume- 
ro da resposta que lhe parece certa ao 
aluno. Neste momento, se o aluno dese- 
jar, podeni adiar sua resposta (digitando 
zero), respondendo a questao no final 
da prova. Deve-se entender as conseqiien- 
cias em se adiar uma resposta. Se o alu- 
no tiver tres chances para responder e na 



primeira chance adiar a resposta, entao 
quando respond e-la no final tera seu 
acerto contado na ultima chance dada, 
ou seja, na terceira. Isto acontece por- 
que adotou-se o criterio de que uma 
resposta adiada, ao ser respondida no 
final, ja esta em sua ultima chance. 

Ao termino de cada quest§o, sera exi- 
bida a mensagem Pressione uma tecla 
para prosseguir. 

As questOes que tiverem respostas 
certas terSo a mensagem Resposta con-e- 
ta exibida e a mensagem de acerto cor- 
respondente ao numero da chance em 
que o aluno se encontra. 

As questoes que tiverem as respostas 
err ad as terSo a mensagem Resposta er- 
rada, o numero de chances que o aluno 
ainda tern para responder aquela ques- 
tSo (se tiver) e a mensagem de erro cor- 



respondente ao numero da chance em 
que se encontra o aluno, exibida no vi- 
deo. Se ainda houver alguma chance, o 
programa voltara' a exibir a mesma ques- 
tao. 

Cada resposta (certa ou errada) tera a 
pequena parte de uma musica tocada 
quando as mensagens forem exibidas. Se 
a prova for muito longa e nao se desejar 
ouvir a musica, pode-se simplesmente 
abaixar o volume da televisao. 

Ao terminar a seqiiencia normal das 
questoes, o programa apresentard as 
questoes que foram adiadas (se houver). 
Neste momento, se desejar, o aluno po- 
der£ adid-las novamente, s6 que na"o lhe 
sera dada nova chance para responde- 
las. 

Ao terminar as questOes adiadas, o 
programa entao apresenta os resultados 
do aluno, informando o total de ques- 




10 REM SISTEHfl DE SIMULRCtfO DE 
20 PEM PROUfl - PREPRRRCRO 
30 REM Mi cro-5i s te»as 

AC REM 5om»er fe Id 

50 LET 5= r. . .... 

LET b$ = " 

let a 



INK C 



=0 

_C0 EORDEP = RPER 4. 

lie PRINT RT 1.12, INK 2. PAPER 

5; FLASH 1; 5 5 P- . PRINT BRI 
Ght i,RT 3 . 1; "Sistema de Simulac 
BO ^e Pro-.; a •■ . rt 4,2; "Micro Sjste 
na s - 5oi«er i'£id" 

140 PRINT RT 5, 10; "PREPRRRCRO", 
RT * .12, •'0PC0E5";RT 11 , S, ,- 1-Mon t 
ar Prova", TAB d;"2-l_er Prova", TA 
B 8, '3-Mudar Questao" ; TAB 3, "4-b 
rsvar Prova' 

160 PRINT RT is ,2; "Indique a op 
cao desejada LET w$ = '1829011 

GOS'JB 9000 

180 I p ZS "1 OR 2$>"4" THEN GO 
TO 160 

190 LET o=UAL 2$ 

200 IF 0=2 THEN GOTO 5000 

210 GOTO 0*1000 
100(3 CLS 

1010 PRINT RT 1 ,8; "MONTANDO A PR 
0'JR",AT 2,8;'= = = = = = = = = = = = = = = = A 

r 5 12, "In forne ; " 

1020 PRINT A - "" 10 . 1. "Quant idade d 
e Questoes.. ".at 12 , l, "Quant j da 
de ae Respostas. ".AT i* .;L. "Chan 
ces Por Questao .••••: " 

1030 LET w» = ' 1027021" . GOSUB 900 

IF Z$ = "" THEN GOTO 100 

1040 LET a='JAL 2$ IF 3=0 THEN G 

0T0 1030 

1050 LET w$= 1227011" GOSUB 900 

IF 2S = ' '" THEN GOTO 1050 

1060 LET b=URL 2$ IF- b=0 OR b>5 

THEN GOTO 1050 
1070 IF PE£" 23 _ '30+256*PEEK 2373 

1 5536" AND a + ' 30* C b+1) +1) >3650 
THEN PRINT RT 21 , 8 ; "MEMORIfl LOTA 
DA" PRUSE 100 GOTO 1000 

1030 LET hi S= 1427011" . GOSUB 900 

IF ZS = "" THEN GOTO 1030 

1090 LET :=URL 2$ IF C =0 OR Ob 

THEN GOTO 1030 
1100 GOSUB 9500 IF z$="n" OP Z$ 
="N" THEN GOTO 1000 
1110 DIM d$ia+2 b+1, 30' 
1120 LET ZS=STR» a 
THEN LET Z$='0"+ZS 
1130 LET ZS=2S*STR$ 
-5TP$ : 
1140 LE- d«(ijl) =Z$ 

; % o cls 

. : PRINT AT 1. 11, "MENSAGENr T 
-: 11 '■= = = = = = = = = "; AT 4.5,"ResP0S 

to: Corretas",AT 11,5; "Resposta; 
£ — adas" 

1220 FOR : =1 TO C: PRINT RT 4+» , 

RT 114 0. x , "-'• : NEXT 
1300 FOR x=l TO C: LET W$="0"+5T 
RS --—02290" G05UB 9000 LE 
T d$il,v+l' =IS NEXT X 



1310 FOR :<=! TO C- LET w$ = "l •-. 
RS --x+l) +"02250" GOSUB 9000 LE 
T dS(2,x+li=ZS NEXT X 
140O GOSUB 9500 IF z$="n" OR ZS 

THEN GOTO 1200 
2000 CLS 

2010 PRINT AT 1 ,6; "ENTRRDfl DAS Q 
UEST0E5" ,TAB 6, "================ 

2020 FOR x =3 TO a +2 

2030 fqr y=4T0 20 =RINT P~ y.0 

NEXT y 
2040 PRINT RT 4., 8, "Questao Numer 
•: -2;AT 6,0. ' Pergunta ".AT l 
« "Respostas " . FOR z=l TO b 

PRINT AT 11+2 ,0;z; "-•• . NEXT z 
PRINT AT 18,0; "Resposta Correta 

2050 LET w$="0300300" GOSUB 900 

LET dS (x ,b+l) =2$ 

2O60 FOR Z=l TO b LET w$="l"*5T 

RS i.l+Z) +"02290" : GOSUB 9000. LE 

T d S 1 x , 2 ) -Z S NEXT 2 

2070 LET WS= 1319011" GOSUB 900 

IF 2S="" THEN GOTO 2070 

2030 LET d=URL 2$. IF d =0 OR d b 

THEN GOTO 2070 
2035 IF 0=3 THEN RETURN 
2090 GOSUB 9500 IF Z$ = "N" OR 2 $ 
s"n" THEN GOTO 2030 
2100 LET dS«x ,d , 30) ="1" 
2110 NEXT X 

2200 CLS PRINT AT 3,9. FlAJh 1 
.- PROUfl M0NTADA",AT 12,3, FLASH 

0,'Aperte quaiquer tecla para", A 
T 14,9, "vol tar ao nenu" 
2210 IF INK,EyS = "" THEN GOTO 2210 
2220 GOTO 100 

3000 CLS PRINT AT 1 , 6; "MUDANCA 
DE QUESTAO". TAB 6,"============ 



IF LEN 2$=1 
LET 2S=ZS 



3005 IF a=0 THEN GOTO 8000 
3010 PRINT AT 4,1, "Qua L questao 
deseja audar ?••; LET wS="0429O21 
GOSUB 9000 IF 2 $ = ••■• THEN GOT 
100 
3020 LET q=UAL 2S; IF q =0 OR q>a 

TMEN GOTO 3010 
3025 LET q=R+2 

3030 PRINT rt 6 ,0; "Per gun ta" , , , , 
d$iq,b+l).RT 10 . ; "Respos t as " 
3040 FOR X=l TO b PRINT AT 11+x 
,0;x; "-■•, d$<q.x) I TO 29) 
3050 IF dSiq,x ,30) ="1" THEN i_ET 
d=x 

3060 NEXT x PRINT RT 13,0, "Resp 
osta Correta ";d 
3070 PRINT RT 20,0, •Confirn.a mud 
anca da questao 7" gosub 9510 

IF 2S="n" OR 2S="N" THEN GOTO 30 

00 

3030 LET dSiq,d',30) ="0" : LET x =q 

GOSUB 2050 
3090 GOSUB 9500 IF z$="n" OP ZS 
=• N" THEN GOTO 3080 
3100 LET dS iq,d ,30) = "1" 
3110 GOTO 300O 

4000 CLS PRINT AT 1,7,"GRAUACA 
DA PR0UA",TAB 7;"============= 



4002 IF a =0 THEN GOTO 8000 
4005 PRINT RT 5.3; "Nome da prova 
LET w$= 0519100" GOSUB 900 
IF z$= THEN GOTO 100 
4010 print at 5.0; "Prepare o gra 

ador para grrvacao" 
iC20 5AUE 2S DRTR dfd 
4.0^0 PRINT AT 9 ,6; "GRRURCRO TERM 
INADA" GOTO 6000 
c 000 CLS PPINT AT 1,7; "LEITURh 

C-fl PROVA". TAB "'."= = = = = = = = = = = = = = 

5010 PRINT AT 5.3; "Nome da prova 
LET WS=' 0519100" GOSUB 900 
0- IF 2$="" THEN GOTO 100 
5020 PRINT AT 5,0;bS,AT 5,7; "Lig 
ue o gravador" 

5030 INK 4 LOAD 2S DATA d S 
NK 

5035 LET a=VRL d|(14H TO 8 
ET b=VAL dS'(l»l 131 LET c =VAL d 
til, 1) 14 

5O40 PRINT AT 9 6, "LEITURR TERHl 
NRDA 

6000 print AT 12 ,4. "Pressione qu 
a i. que r tec '.a' AT 14,7, "para volt 
ar a o menu' 

6010 IF INKEYSs"" THEN GOTO 6010 
6020 GOTO 100 

3000 PRINT RT 20.3."PR0Vfl NAO E5 
TA NA MEMORIfl" PAUSE 120 GOTO 

100 

9000 LET wi=VAl_ w$'. TO 2i : LET m 
2=UAL WS>3 TO 4> : LET w3=VAL u) $ l 
5 TO 61 . LET w4=32 LET ui5 = 123 
LET w7=0.. LET 2$="" 
9010 IF »Ji?l ="1" THEN LET oi4=48 

LET W5=57 
9020 PRINT AT wl,w2,x»t TO »3J 
9030 PRINT AT wl,i»2.">" 
9040 PAUSE LET aS=INKEYS SOU 
ND .0005,50 LET u6=C0DE as 
30S0 IF «6=13 THEN PRINT AT «1 to 
2.bS' TO W3-W7+1) RETURN 
9060 IF w6=12 THEN GOTO 9100 
9070 IF w7 =w3 OR «6<w4 OR WG E 

THEN GOTO 9030 
9080 PRINT AT »l,w2,a* LET w7=ui 
7+1 LET w2=w2+l LET 2S=2$+aS 
GOTO 9030 

9100 IF «?-^ THEN GOTO 903O 
9110 PRINT RT »l,w2;"." 
9120 IF-»7=«3 THEN PRINT AT » 1 w 

9130 LET w2=«2-l LET U7a#7-1 L 

ET ZS=2S< TO iii7l GOTO 9030 

9500 PRINT AT 20 ,0, "In rormacoes 

Cor re t as ? (S/fV) 

9510 LET hiS = "2030010" GOSUB 900 



9580 IF 2S S RNC Z$. ►"S" AND 

Z$ ,"n" AND ZS: "N" THEN GOTO 96 

10 

9530 RETURN 





F = pode ser gravado em fita K7 
J = uso obrigatorio de joystick 
48 = requer 48K de RAM 
64 = requer 64K de RAM 

JOGOS • APPLE II 
- Cr$ 70.000 • 

Sabotage (Fi • evite os para-quedistas 
Sargon (F) ■ jogo de xadrez 
Draw Poker (F) - jogo de poker 
Blackjack (F) ■ jogo de 21 icartas) 
Checkers (F) - jogo de damas 
Fast Gammon (F) - |ogo de gamao 
Othello (f) - logo de tabuleiro 
Lode Runner • pegue os tesouros 
Olympic Decatlon - jogos olimpicos 
Space Raiders (F) • de tipo Centopeia 
The Eliminator (F) • combate espacial 
Night Crawler (F) - enfrente as Centopeias 
Space Eggs (F/J) ■ cacar ovos espaciais 
Hard Hat Mack perigos na construcao 
Head On (F) - |ogo de corrida 
Choplifter (F/J) resgate com helicoptero 
Sea Dragon - pilote o submarine 
Spy's Demise (F) • jogo de agente secrete 
Star Blazer • combate aereo 
Viper (F) - alimente a cobra 
Cavern Creatures - penetre na caverna 
Moon Patrol (F) • patrulha lunar 
Ms Pac Man (F) • a namorada do Pac Man 
Mario Bros (F) - Mario contra o gorila 
Buck Rogers ■ pilote sua nave em "Zoom" 
Pitfall II - aventuras nas cavemas perdidas 
Castle Wolfensteln • engane os nazistas 
Beyond Castle Wolfenstein • mate Hitler 
Artec - decrfre o enigma da piramide azteca 
Stellar 7 combate no espaco em 30 
Rlbblt (F) ■ jogo tipo Frogger 
Super Buny ■ combata as pragas 
Allen Ambush (F'J) - jogo tipo Arcade 
Out Post (F) • defenda a estacao espacial 
Defender (F/J) • Defender original 
Dog Fight II (F) - confronte de jatos 
Star Trek • Jornada nas Estrelas 
Jellyfish • puote um submarmo 
Swashbuckler II ■ duelo de espadachins 
Temple Asphai - aventura no templo 
Flight Simulator (F) - simulador de voo 
One on One (J) - basquete com 2 jogadores 
•Cr$ 150.000- 

Karateka • perfeita simulacao de karate, 
Enfrente vanos adversanos e liberte a 
pnncesa do Akuma. 

Conan ■ localize e destrua Volta em varias 
fases e com diferentes obstaculos. 
Ghostbusters (J) ■ monte uma empresa de 
caca 80s fantasmas e cornece sua 
aventura. Baseado no filme. 
Summer Games (64) - 8 modalidades 
completas de atletismo, com as mais 
emocionantes provas olimptcas de veraa 



SPY vs SPY - divertida acao de espiao 
contra espiao. baseada nos famosos 
personagens da revista MAD. 
Droll - fantistica perseguicao com vanas 
fases. Graf icos mcriveis e acao rapida. 
Sky Fox (J/64) • supersimutador de voo 
com incriveis situacoes de combate em 
vanos niveis. Graficos sofisticados 
Mask of the Sun • aventura grafica. 
No Mexico, voce deve actar os tesouros 
perdidos de uma antiga civitizaijao 
Kabul Spy • thnler de espionagem tendo o 
Afeganistao como cenano 
Dark Crystal - aventura grafica baseada no 
filme "0 Cristai Encantado". Ache o 
fragmento do cristai. passando por 
diferentes cenanos 

Flight Simulator II ■ pilote um Piper 181 
totalmente equipado. atraves de realisticos 
cenarios, de Nova York 8 Los Angeles. 
Quando voce estiver preparado enfrente 
um combate real da 1* Guerra Mundial. 
Seven Cities of Gold (J/64) • aventura 
grafica. Voce deve achar o Novo Mundo. 
retomando com ouro e gloria para a Coroa 
The Incrfvel HULK • aventura grafica 
baseada na revista do HULK. Voce deve 
dotar este incrfvel ser de intehgencia 
Capitain Goodnight (J/64) • sua missao e 
SALVAR MUNDO das garras do terrfvei Dr. 
Maybe localizando e destruindo a arma do 
luizo final. 

Rescue Raiders (J/64) - pilotando um 
helicoptero. comande suas tropas, durante 
esta incansavei batalha 
Bruce Lee (J) • lute karate como o famoso 
Bruce Lee Mate os ninjas e os lutadores de 
sum6. e complete as mais incriveis fases. 
Mr Do (J) • voce e um magico que devera 
proteger o seu pomar de uma terrivel 
praga 

Were is Carmen Sandiego (64) - seja um 
detetive que devera prender o eulpado pelo 
roubo. Viaje peio mundo coletando pistas 

UTILITARIOS/APUCATIVOS - APPLE II 

- Cr* 320JDOO • 

Vislcalc - plamlha de caiculos 
Vlslplot/Vlsrtrend - gerador de graficos 
Vlsldex - organizador de ativkJades 
Vlsifile - gerador de banco de dados 
Vrslchedule • analise financeira PERT/CPM 
Apple LOGO • compilador 
Apple FORTRAN (CP/M) ■ compilador 
Apple Mechanic - utiiitano grafico 
GraFORTH • compilador 
Locksmith 50/F - utiiitano de copia 
Nibbles Away II/C3 - utmtano de cop.a 
The Graphics Magicians - ammador grafico 
The Graphics Solution • editor de graficos 
Print Shop ■ gerador de impressos graficos 
-Cr$45O000- 
Turbo PASCAL (CP/M) - compilador 
Take 1 • superanimador grafico 

JOYSTICK AMALOGICO • APPLE II 
-Cr$ 280.000- 
JOGOS • CP-300/500 

- Cr$ 70.000- 

Flight Simulator (F) - simuiador de voo 
Olympic Decatlon (F) • jogos olimpicos 



O SOFTWARE PARA O SEU MICRO 



Armored Patrol (F) - patrulha de tanques 

Alien Defense (F) • proteia-se dos mvasores 

Meteor Mission (F) • cacada espacial 

Outhouse (F) - proteja o seu banheiro 

Robot Attack (F) - destrua os roods 

Sea Dragon (F) - pilote um submarmo 

Missile Atack (F) - defenda sua cidade 

Scarfman (F) - jogo tipo Pac Man 

Cavern (F) - escape vivo da caverna 

Penetrator (F) ■ aprofunde-se na cavemas 

Assault (F) - fuja dos ageis mimigos 

Demon Seed (F) • acabe com os enormes 

passaros 

Cosmic Fighter (F) - jogo bpo Invasores 

PBnlk (F) ■ escape dos rooos 

Crazy Painter (F) - pmte a tela, se pudert 

Chicken - ajude a galinha 

Galaxy invasion (F) - tipo Invasores 

Sargon (F) • jogo de xadrez 

Asilo (F) ■ aventura grafica 

Zork I - superaventura 

Adventur - 4 aventuras diferentes 

FucFuc • programa pomografico 

Ghosts (F) - cace os fantasmas 

Rally ■ pegue todas as bandeiras durante 

um rally 

UTILITARIO/APLICATIVOS - 

CP-300/500 

-CrS 390:000- 

Creator - gerador de programas BASIC 
Vislcalc - plamlha de caiculos 
Scripsit (F) - processador de textos 
Clone III - copiador rapido de discos 
ACCEL 3/4 - compilador BASIC 
Bascom - compilador BASIC 
- CrS 490.000 - 

NEWDOS/80 20 - sistema operacional 
DOSPLUS 15 - sistema operacional 
Arranger II • arquivo de diretdnos 
Profile III gerador de banco de dados 
SuperSCRIPSfT • processador de textos 
ZEUS • supereditor assembler 
DIsnDATA • super disassembler 
•Cr$ 590.000- 
Producer • gerador de programas 
Super Utility 3.2 • superutilitarto 

JOGOS- SPECTRUM/IK 90X 
• CrS 60.000- 

Flghter Pilot (48) - pilote um F-15 Eagle 
Flight Simulation (48) • simulador de voo 
Hungry Horace • divertido Pac-Man 
Horace & Spiders • enfrente as aranhas 
Horace skiing (48) • esquie montanha 
abaixo 

Meteors • destrua os meteoros e naves 
Combate Zone - batalha de tanques em 3D 
TerrorDaktll 40 (48) - acao na terra perdida 
Astro Blaster - defenda o impeno 
Trader (48) • comercto e acao no espaco 
Styx (48) - ande o labirinio e mate a bruxa 
Tutankhamun (48) • explore a tumba 
Arcadia • sobreviva na travessia fatal 
Space Intruder - jogo tipo Invaders 
Tornado (48) - pilote o aviao. Cenano em 3D 
Planetoids - aventura espacial 
Match Point (48) - fantistico tenis em 3D 
Cavelon (48) • uma aventura no castelo 
Galaxy Attack (48) - varias fases no espaco 
Chess - jogo de xadrez 
Android2(48)-m3teosrob6s.Cenarioem3D 
Escape - saia do labinnto sem ser mono 
Lab 3D - sera que voce sai dessa? 
Ground Attack • jogo tipo Penetrator 
Delta Wing (48)- pilote um caca F- 16 em 3D 
Manic Miner (48) - recolha os objetos da mina 
Potty Painter (48) • preencha os quadrados 
Pool - fantastico jogo de smuca 



Pflrfere (48) - recolha as pecas do 

computador 

Piromania (48) • apague os mcendios 

The Pyramid (48) • aventura na piramide 

3D Tank Duel (48) • superbatalha de 

tanques 

3D Starstrlke (48) • guerra nas estrelas 

Son of Blagger (48) - recolha os objetos 

Psytron (48) • defenda sua base lunar, em 3D 

Wheelie (48) • pilote uma moto no 

subterraneo 

Fall Guy (48) • baseado no filme DURO 

NAQUEDA 

BoogaBoo (48) - ajude o sapo 

Arcventure (48) • mate o Conde Dracula 

Hunckback (48) - ajude o corcunda 

Harrier Attack • combate nas Malvmas 

SPY v SPY (48) • guerra dos espides. 

Knight Lore (48) - aventura no castelo, em 3D 

Fred (48) • desvende os perigos da 

piramide 

Fantastic Voyage (48) ■ entre no corpo 

humano 

Airwolf (48) ■ baseado no senado AGUIA 

DEFOGO 

1994 (48) • uma missao no future 

River Raid (48) - percorra de aviao um no 

perigoso 

Blade Alley (48) • desafio espacial em 3D 

Maziacs (48) - cace um tesouro no labinnto 

3D Ant Attack (48) • salve a mocmha das 

formigas 

Spectres um jogo diferente tipo come-come 

New Poker (48) - ciassico jogo de poker 

Androids (48) - aventura no labinnto 

Chese Cake (48) - salve os humanos 

PSSST • salve sua plarrta das pragas 

Cookie ■ ajude o cozmheiro 

Scubadlvs (48) • recolha as peroJas do mar 

Penetrator (48) ■ destrua o reator 

Jetset Willy (48) - recolha os objetos 

Tranz Am ■ pegue os trofeus nos EUA 

Full Throttle (48) - corrida de motos, em 3D 

Chequered Rag (48) - mantenha a POLE 

POSITION 

Worse at Sea (48) - mantenha o navio 

flutuando 

Trashrnan (48) ■ ajude a manter a cidade limpa 

JetPac ■ construa os foguetes 

SekWad Attack • combata os invasores 

Aquaplane (48) - uma lancha num mar de 

pengos 

High Moon ■ duelo no velho oeste 

Invasion Force - destrua a nave mae 

Jump Hallager (48) - pule os obstaculos 

Night Gunner (48) - pilote um bombardeio 

Sir Lancelot - pegue os objetos no castelo 

Ghostbusters (48) - caca aos fantasmas 

Blind Alley (48) - baseado no filme TRON 

Molar Maul - defenda seus dentes das caries 

Galaxlans - destrua as abelhas assassmas 

Monster In Hell - cuidado com o inferno 

UTILITARIOS/APUCATIVOS - 
SPECTRUM/TK 90K 

- Cr$ 70.000- 

VU 3D • utilitario grafico Telas em 3D 
VU Calc ■ plamlha de caiculos 
VU File • arquivo de dados para uso geral 
Ultra Violet - super disassembler 
MCODER II - compilador BASIC 
Paint Box - editor de telas graficas 

- Cr$ 90.000- 

SoftCALC - planllha de caiculos com 

GRAFICOS 

PASCAL 1.6 • compilador 

SpecFORTH - compilador 

ASSEMBLER - supereditor assembler 

Tasword II • processador de texto com 

64 cohjnas 



Desejo receber os segulntes programas pelos quais estou envlando um cheque nominal a ATI Edltora Ltda.. Av. Pres. Wilson, 165 - Grupo 1210 - Centra. CEP 20.030 
Rio de Janeiro - RJ. Despesas de correio ja incluidas 

Computador: ( ) CP-300/CP-500 ( (APPLE II ( ) SPECTRUM/TK 90X. ITEM(s) PRECOCr$ 

Com:.... K RAM. Desejo os programas em: ( ) FITA ( ) DISKETTE. 



NOME: 
END.:_ 
UF: 



CIDADE: 



CEP.:. 



TEL:. 



TOTAL Cr$ 



42 
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Softline - Av. Gra?a Aranha, 145. Slj. 01 - Centra - Rio de Janeiro - RJ - CEP 20.030 - Tel.: (021) 262-6968 



SIMULADOR DE PROVAS 



Execucao 



10 REM 
20 REM 
3C REM 

tfl REM 

50 L£T 



zli~-~& CE SIMULflCflO CE 
CDOVfl - EXECUCflO 

- : : - : - 5 : 1 I £ ft = = 

S o » h e r f e Ld 



r : 



LET es= 



_r 



30 

RTfl 1,-5. .1.-5, .3.-3, .2 - 

5 .1 .2 -1 .1 -5 . . 1, -5 . .2.-3 . 
2-5 .1 2 .2 -12 -12 -8,-3 -S 

-5 -7 -S -.0 -3 -3,-10 -12 

70 OIM • I'"" FOP • =1 TO :;- = - 

EP 2 READ Z !_ET to i ■ i =2 PE^Z : 
LET ft (X+l) »Z NE'T 
90 FOR =25 to 3~ RE«l z _=t 

aZ NEXT 

.00 BORDER POPER a IN' C 
LS 

I - 2 PRINT ft! 

6 FLfioH 1 
BMT 1 RT : - 
a o de P f o •■ ; 



i as - 5o ik pi € ■ fe i' 



12 INK 2 PAPER 

5 p- PRINT ==: 
st em a d€ Ssoyia: 
- S "Mi cro 5: 5 • = 



14.0 PRINT fll 
3 12 "OPCOES 

' : ■ s TAB 10 



11. "ExECuCflO RT 
RT 12 10 ' I-!_er P 
2-Fazer Prova - ' 



160 PRINT RT 13 .2, "Indi que a OP 



LET *«s 1829011 

IF 2» = '" THE' I SOT 



: i : atstjodi 
005UB 9000 

: 160 __ 
to 150 

TO iV0 

190 IF 2»= 2 THEN GOTO 2000 
1000 CL5 PRINT AT l,7;"LErTURR 

£.S. PPOUR ■ TAB ?,":::::::::::iM 

1018 print RT 5 3; "Noae da f 

LET w§ = 0519100 ' GOSUB 900 
IF z$= "HEN GOTO 100 
1020 PRINT RT 5 a.b$;RT 5 ~. Lig 
ue o gravador " 
1030 INK a LORD :{ ORTR d$<> I 

nc a 

10*0 -LET a=VRL d»(l .11 i TO 2 1 i_ 

ET d='.iRL d$il.i.l3!: LET-t=URL d 

* - - 4.1 

10S0 PRINT h t 9 .6. "LEITURR TEPMI 

NRDfl" 

1050 PkInT - _ 12.4. "Press i on*. Hu 



= " h : -:". PRU 5E II" " S a *c 

:;-; iaa 
2000 :_: print rt 1.7 execuc= 
: :- prove ~- = ~ = = = = = = = = = = — = 

2002 IF s=0 ~- = r - PRINT RT 20 : 
= c;.- NRC £:~- '•- MEMORIR PRuS 

2005 ;_ET e»0 LET =0 -E~ - =0 

: : :- : 

20.0 r := =: _ : s-2 

2015 P 0R Z=~ TC 20 PRINT ST 2 Z 
;= N£*T z PRINT -" - " -.-.I' 
z\ ■•.•■£"■: -2 _5 - =n -1 

2 02: BRINT - S - := b * 1 
2030 ~0B z=. TC : PRINT RT "-: 
z - 3S Z TO 29 I r :3 

Z JO = 1 THEN _£ _ i=Z 
20:5 •£•- Z 
20-0 »RINT RT _- 1 :.= . i z -.i-' 

St3 " 0=-;~-- LE := --i5C- 

:::.: rooo :=■ z = = then :-: 

TC 2040 

2050 :- .-_ Z= : then i-: _ : 20-: 

20:5 PRINT RT 16 _ r _-r- - RE: 

2050 ~" Z=- 2 _ -5'. PPIf-T" FLflSr 

-: :-: - _e~ ■" = ••-- _s~ - = : 
_e _ 3 - . BOTE 2100 

20~0 : r -- Z==r THEN PRINT =_P: 
- . lOPRETR Z-Zz.z zZ-Z-C -ET T 

3 =0 _£" :-=:--! PRINT 

rt ia : ;= . --. 

2050 :- .-_ z= z -••: z= o 

EN =RINT -_-;- . ERRROR Zlz.z 

3500 _5~ •« =0 _E _ -:=-:-- 

BRINT «T 13,0 a$l2.h«! IP h : 

_ -£ . PRINT rt -.9 o ^OCE RINOfl 

"I :-- Z h RN C E S 

2-00 PRINT - - !Z~ ="£=;::"-: . 









:■•='!■ iz.i-i-z ■ R T 12.9 FLRSH 
JLTIMfl CHANCE PAUSE 300 

2 1-0 CL5 

2200 _5~ : =J PRINT AT 1,9 _ _ : 
••- ZHANCE" _ h= 5 = = = = = = = = = = = = = 

22-C FOR =3 TO a+2 

2220 IF rj - 1" THEN l£T • = -i 

LET -=:-i SOSUB 2015 
22 20 f;E' _ 

2300 :_r IN»< 2 PAPER T =^Hfn 
1 PRINT ~~ 10 5. Agora VOC€ b 

: saber at 12 4-, "seus resultadc 

= na prova ^^ash o ink o pap 

5= 4 PAUSE 1-00 

2310 :_: PRINT AT 2,*; "Respost 

== Corretas = a-e-f;AT 4 4 -Re 
s-pos tas Er r ad as = " ; e ; AT € 4 = 
espostas Ad i ad as = ■' : f 

2J20 PRINT A^ r 4 'TOTAL DE DUES 

~z=i = a; AT 11,1 Acertos pel 

:• n u i» e r d e : = - : t i 

2330 FOR =1 "I C PRINT A - -2- 

13 = z NE-~ 

•2 340 PRINT AT i9 . 4, "Pr ei : : : -: : 

a iquer te c la tab 7; "pa ra vo 1 1 a r 
50 aenu" pause goto 100 

fOOO FOR z=_ _ : 22 STEP 2 
■ z •• Z-. NEXT Z RETURN 

3 500 FOB Z=25 TO 37 SOUND .1,1111 
NEXT z RETURN 

1= AL If Si TC 2 _ET ui 

- : 4 _E _ ■'■ 3 = . RL ID i 

LET ■ 4 =32 i-ET .,15 = 123 

let ::=■■ 

-F 1,15 ■-. = i ' THEN LET ■•'4=4 = 
LET * 5=5 - 
r020 - = In - 4- v; „i2 |l TO U ■ ' 
9030 PRINT AT ■ - w2 
9040 PAUSE LET a$=INK£ i 50L 
ND .0005 50 LET »6=CODE 5 5 
9050 IF U6=13 THEN PRINT AT 
2 : I ; »3-*7+i PETUPn 

3060 1= »6=>12 THEN GOTO 9100 
9070 If ■'■■' =«3 DR U6 '"4 OR £ S 
THEN BOTO -020 

= -Z'~ -~ l,«i2,as _s 7*1 
"'1 LET W2=w2*l LE - z$=zj-i5 
BOTO 2030 

r.00 IF ~=0 THEN SOTO 203" 
3110 PRINT 4- J ., ; . ■■ . ■• 
i-ZiC- Z- ■■' = ■■■ : THEN PRINT AT 

2130 _5~ 2sM2-l LET W7=«7-l L 

et rs=-s _ : •- BOTO 20:0 



!-:■=■■- us 
5 TC S 
lET w7=0 



Torne-se urn.- 
COMPUTER DESIGNER 

Aprendendo: 

• DESENHO ANIMADO 
POR COMPUTADOR 

• ARTE 
COMPUTADORIZADA 

• VIDEO-GAME 

• PROJETOSPOR 
COMPUTADOR 

• LINGUAGEM DE 
PROGRAMAQAO 
FORTH 

Promogao especial 

com cursos de 

ferias 

Av. Miruna, 200 - Moema 
(AtrSs do Shopping Center 

Ibirapuera) 
542-4273/255-5777 R.3108 

/MICROGRAPH 

CURSOS E CONSULTORIA 



ni :' : - : ,'. vau rAvKL 


PROGRAMA OL 


B A UTILIZA 


A - Quant idade de questoes 


PREPARACAO 


EXECUCAO 


SIM 


SIM 


3 - Ouantidade de respostas 


SIM 


SIM 


C - Numero de chances por questao 


SIM 


SIM 


D - Resposta correta 


SIM 


SIM 


E - Total de questoes erradas 


NAO 


SIM 


F - Total de questoes adiadas 


NAO 


SIM 


G - Matriz com numero de acertos por chance 


NAO 


SIM 


H - Numero da chance corrente 


NAO 


SIM 


M - Matriz com notas musicals 


NAO 


SIM 


- Numero da opcao de rotina 


SIM 


SIM 


Q - Codiao da questao a alterar 


SIM 


NAO 


X - fndice para looping 


SIM 


S I M 


Y - fndice para looping 


SIM 


NAO 


Z - fndice para Looning 


SIM 


SIM 


DS - Matriz contendo a prova 


SIM 


SIM 


RS - Matriz com indicacao ae respostas 


NAO 


SIM 


adiadas 







Figura 3 - Lista de varidveis. 

t5es da prova, o total de questoes corre- 
tas, erradas e adiadas e o numero de 
acertos pelo numero de chances, ou seja, 
quantas questoes o aluno acertou na pri- 
meira tentativa, na segunda etc. 

Apos digitar o programa, grave-o em 
fita com a instruc3o SAVE "EXECU- 
£AO" LINE 10. As variaveis descritas 
nos programas sao descritas na figura 3. 
Para a entrada de dados, utilizou-se uma 
rotina que sera descrita brevemente em 



outro artigo. Assim, as variaveis que nao 
estiverem definidas aqui e" porque fazem 
parte da rotina citada, onde estao descri- 
tas. 



Jos4 Rafael Sommerfeld trabalha ha" mais de 
cinco anos com programacao de microcompu- 
tadores e 6 autor do livro Aplicacoes Pessoais 
para o TK85, que esta" atualmente em fase de 
producao grdfica. 
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Micro 
de 16 BITS 
comalta 
performance 



* Destina-se as mais variadas aplicagoes 
de uso pessoal e profissional, 

com alta perlormance em luncOes 
administralivas e gerenciais, 

• Qualidade. a maior vantagem da Victor: 
garanlia de 1 ano 



CARACTEHISTICAS TECNICAS 

• Microproccssadof Intel BOSS. Clock 4.77 Mhz 

• Co-proceswdor 8067 opawial 

• Mem#ia EPROM do 40 Kbytes txpandml ale 
64 Kbytes 

• Memocia RAM de 256 Kbytes 
enpandiwn He 640 Kbytes 

• Tela de video de 40 X ft ou 80 X 25 
caracteres. com 
16 ewes em modo atfa-numerico 

• Tela dc video de 3?0 % 200 ponlas com 4 ewes ou 
640 x 200 pontes monocromaticos cm modo graftco 

• Duas umdados auonadoras de disco llexhret. dupla 
laca dupla densidade conlrotadas por uma unica 
interface para a»ma/enamento de 320 KbytDs por 
dftco 

• Opcionaimenfte acerta ale duas umdades Winchester 
drsco ngido com capacidade de 10 Mbytes cade 

• Seidas sonal assmcrorw t paretela 

• Fonie de almentacao chaveada de 135 Watts 

• CMo coneclores para expansao 

• Teclado capacrtfvo sum contatss mecinicos da alta 
durabilidade. com 84 teclas com tepelicao auiomatica 

• Monitor monocreniitteo de alia persttttnea t resolucao 
de 24 Mhz de banda passante em eonriguracao 
mumtonal com capacidade de resotucJo 

maxima em modo texto de 160 cokmas de caracteres 
por 48 tanas 



v <»■*, 





H'P 



i5T?:^>K^>ffi::«?;:i>:-] 



1.744-SP -Fone (01 HS72-4788 

HW5 \01 II S64-0G79 e 872 2 




CONFIE EM QUEM E RIGIDO E COIMSTANTE. 



Os cabos coaxiais para radiofrequfincia RADIOFLEX 

sSo produzidos de acordo com a norma militar MIL. 

C.17 e outras normas internacionais. 

Por isso suas caracterfstieas eletricas e mecdnicas sio 

rfgidas e constantes. 

Produzidos com o melhor cobre eletrolftico e a mais 

sofisticada tecnologia mundial em cabos trancados, 

seu controle de qualidade 6 feito na pr6pria linha de 

montagem. 

Sua instalacdo e mais facil, por sua alta flexibilidade - 

que permite atingir pequenos raios de 

curvatura - e por sua complete linha 

de acessorios. 

Os cabos coaxiais RADIOFLEX tern 

opcUo de impeddncia de 50, 75, 93 e 

95 ohms em varias bitolas. 

SSo fabricados com componentes 

que facilitam a instalacSo e garantem 



RADIOFLEX 



kmP 



Cabos Eapmdaia a Sistomas Ltda. 

BR 1 16/km 25 - C*. Postal 146 - 06800 

Emfcxj SP ■ Tel.: 01 1/494-3433 Pabx - Telex 

011 '33234 KMPL - BR - Tetogrwnas Pirelcable 



um contato eletrico perfeito, alto desempenho eletrico 

e baixa relacSo de onda estacionaria. 

Uma capa de PVC de alta resistencia assegura sua 

protecSo contra intempe>ies, 

Seu condutor eletrico interno 6 vedado*por uma 

blindagem de fios trancados dentro dos mais rfgidos 

padrdes de qualidade e tecnologia proporcionando 

excelente blindagem contra RF, 

E, o mais importante: os cabos coaxiais RADIOFLEX 

sSo fabricados pela KMP - uma empresa que utiliza a 
melhor matGria- prima, pessoal 
brasileiro altamente especializado e 
tern como ponto principal a qualidade 
dos produtos que fabrica e um fndice 
de nacionalizacSo de quase 100%. 
Aplique na engenharia da KMP e, veja 
as vantagens de confiar em quern e 
rfgido e constante. 



trs-80trs-80trs-80trs-8 



Micro cartao de Natal 



Ricardo de Oliveira 



Fim de ano e tempo de festas. Para voce que possui um mi- 
cro da linha TRS-80 (modelo III) e deseja mandar um cartao 
de Natal especial para um "micro amigo", este e o programa 
que voce estava procurando. 

Digite e rode-o. Caso queira obter uma copia do cartao 
na impressora, acrescente inicialmente a linha - 



Em seguida, adicione a seguinte rotina, elaborada pela 



Equipe Tecnica de MICRO SISTEMAS: 



■ i . i i • • i •■ i * 

.■ I ui , ■ i 11R J . 

I" •>• i > I ll , l . . - 

ie i • i i 

.|.<-,.- ill ir i 
hi • I I 
|<| llipfi 



E por ultimo, faca as alterac5es a seu gosto e. . . um Feliz 
Natal e Prospero Ano Novo! 



i * 

nil BO CARTAO DL NATAL < << 

Linha trs-80 - ri.id. in <<< 

4 ' >>> Ricardo dc Oliveira <(< 

)>> Boa Esperanca - MO l<< 

6 ' >>>>>>)>>>>>>>>>>>>><<<<<<<<<<(<<<<<<<<*< 

ie 1:1 e*ri000 = gosub 60000:1:1 
LIB 700 
I 

i< (9,23>:X< USR< 30776) :PRINTa515. UHR*' 152) ;CHR*( 1 39 I : CHR*< 14 

4>SX »USR< 15410) 

lit i ■• iNlair/.'H.r.nh'i' !■!• •:■ iPR INTCHR1C 1 4 1 ) t « X«USR i 

9>«PRINTCHR*(1S6) r«> I «PRINTCHR*tl34> : «X«USR(134»0> 

120 PRINT«I642.CHR*( 191 >:CMR*( 191 >;CHP*< 191 >;CIIR*t lBfi);CHR*< 180): 

X-USRI 154163 

13© I'RINI J706.LHR*' 191 ijCHP*' 1 9 1 ) ; I MR * ( 1 V 1 ) ; CHR* ( 1 V 1 ) ; CHR* t 157) : 

■ 
14* PRINI^'f .CHR*(l<»l)fCHR*(l43)|CHR*(J43)»CHR4<J9i)|CHR« 
: <»UBR( 

15© PRlNTaB32.CHR*<l60> ■ ■ I'll INlCHP* I 1 J4 I : ■■ X-U8R' 

7>!PRINTa83B.CHR*(13.'> i I <-USRl 32554) 

160 PR1NTLHR4' 1 52 > J «X-USR t 3:'554 > :PR1N I CHR*. I! 1 >|tX*USRl 32568) :PP 
lNrCHRl(13l);:X = USR<32562):PRINTCHI-*< 1 40 ) ; : X=USR < 32542 > :PR 1NTCHR 
4' 144.. 554) 

170 PRIHT9396.I MR* i 130) J : X=USR • 15405 ' :PR INTCHR*( 1 40 < : ! X-USR ( 1541 
0>:PR1NICHR*( 176>;:X-USR(3256B> 

180 PRINia901.CHR*( 176) j:X"USRi'J?562>:PRIMTCHK*< 1 40 ) ; : X = IISR c 1541 
6>:PPINTCHR*(129>;:X=USR( 32579) 
19« PRlNTa963,CHR*(131 >»: X=IJSR ' 32562 ) :PP INTCHRK 131 > ; : X=USR ( 3256 



■ I 



I .■' ■ 



I I 









200 i'KlNTa966,CHR*( 131 ' : : X = USR < 32554 >: PR INT CHR* 
5):PRINICHR*<l/6>r:)'*IJSR(1541^):PRINrCHRt' 176>; 
NTCHR*' 1B8>; : X = USR ( 15410 ) : PR INT CHR* ( 191 > ; tX-UBR 
c l'/l I, : x = U',R ( 32579 >:PRINTCHR*< 191 >j:X="U3R( 32549 
210 PRINTCHRV 1' ' :PRINTCHR*( 145> 

INTCHR4< 129) | tX»USR( 15397) 

!2« PR INTa9«/.CHP1.' 131 ) ; »X»U9Rl 15404) iPRINTr.HPi 
4) :PRINICHR»i 191 >: iX'USRl 12545) :r'RINTCHRt< 191 ); 
NTCHR»(191 )l :*^IISR( 15«16)!PRINTCHR*«i37)|i 
. i" PRINTBB44.CHR*<136)|iX*l)SR(3256B) IPRINTCHR1 
INICHR*(1B9>; :x=USP' 15435) «PRINTCHR*< 19«) J 
235 FOP ft»«T0 I0OINI ■ I 

.'40 prihii HWii I'.vi : :.; USR< IB '6MPR1NTCHR*U471 
INT9783.CHRt(144>i "X-USR II »41A)i| RINTCHRSI 160) ; 
NTI HP*' 150) ! tX-USR< 32568 upR I NIC HI. 4(144 • ; I ■ 

'St PR INiaf.R4,rilR4i 184)j3X»(J R( 15416 UPRINT364 
:PRINTCHR»(191)|XX U :PR1NTCMP*( 



'140»i:X=U5R(1540 
IX-USROS56BXPR] 

< l5416)iPRINTi:ilRt 

) 
::x=USR«32543):PR 

I 190); »X«USR(3255 
:x«USR(32554):PRI 

■ 

:'=USR(1542 

: . I | I- | 

|SX=USR( 15410) :PR 
:x=USR(32579)ipRI 

■ 15410 1 

. LMR41 190); : • LISP. 
14fl);i>=USR (32549 



■ N1 .i M 1 .l.HRti 14. ;:• !FRINrCHR4(141)f«X»USRl3255 

l):PRIN . : (-USR02S68 

) 

i!X=USR<3 562 >*SET«I I I '■' ■ : I ! " ' ' : '~ u '' 

,.,:.;; l,20)tX*USR(i: »6 i I El I .21 ' _ ■ U9R I 15418 HSE1 

■ 1SET<I 2is9tT(23.27):X«USR( i'.416) 

■-. ., . : . USR( 12! JSET«22 ■■■ ■ 

i I. ini .,,■:! i ■ ,5 1 =PR INI i 

UlUI | : : v ii DiPRINl .8" : < " (NT I 

410 i :l'i. Il'l ...•■■ LI !•■■•. I : ■ ii if ■ . ' 

285 PRINT' A' i i • -USR! I 

USRi LI 19 ! :i • 1 1' i < ■■■><' ■ : 

PRIfJl Rfl-| . ; : ;,• ... i,. . : i ; PRINT' 

IM ; : ■ . ■ :p|. |N1 I.. ■ : i I>:PR1N1 AN ■ 

ft) (PR IN ■ ■ ' ' 

568) 

RJN1 i ■ : . ir ,. ■ ■ i ■-. 15 ■ :ri- nil , ' ■ Ii 

10109 ■■■•I I ' M. i ' -' i I " U ' 

'.. I DR| ,■. .: i I '.VI ■ : II i I 1 I 



i : ,.■ 
Ml ■ • 

..40 I ".- : ' ■ ■ : | I 

m ..:-,i I .. .,,., . : .| | | . . :. . 

il i ■ 

I " • 1 ■ i .i. ... . ,i m porl idoi 

a 1 1 jt >■ • ii .-( an i. . . ■ ANl '■ . • ■ . I ; ' i 

■•• i i ' . ■ ' 

590 kl SL t ' . . 

eRESI i i ■ i'. 

■ : ' USRCS24) tRESET<17, 
B.I i i ■ 1.29) :X>USR<5)G 
.34XX-USC ■ 
,34) •■ ■ •• 516) :SF I '•)..'•'': > LfSF 

(51B):3ET(23.27)I> "J9R (52«> «3ETI I ■ ISR<522)>9E1 (13.23) sX-U 

; USR(526)«SET(B.2#>«) USRCS28) tSEI (3,2 -- • < • 
lOXSI I I i . !5 ' : K»USR(S32) >8I I I I . iX»U8l 534) 

■: >,' B01 

■■ i'HRI. ■ i .14 > 'i hi | | i*CHR*<18ei*CHP»<190>«CHR*(lB4"rHRVM 

I R»<95>*CHR»(95)+CHR*(95) »CHR*( 17?) »CHR*( 140) »CHRt( 150»*CHRt 

(V5)*CHR4<172)*CHR*(140)»CHRt(l ■ 
■■10 L»-6TRINQ*(16.32) 
'.'■!> FOR x = .-.4 Id LIB 

730 PJUN19X»TisF0RA«*T015«N£XTAi! >USR<2068) 

'40 PRINiaX.I.* 

750 Nl • 

R I 4TO47tSET(He.Y)5B"USP<25©0)5RESET<ll0.T)xNEX I 

779 FORX=110TO0STEP-1 : II' 
7 B9 FOR Y»47TOBSTI ' i - ■ » - . 

■ I • iMn, ■:■.[.'■ ■ INEX1 

800 FOR T»eT047«SI iNEXTl 

■ 1 -ini 10STEP l >SET<X.47)«NEXTX 
•IB3T01 13«8E1 <.4)«3ET(X, 10)>NExl 

B30 FOR Y = 4I hi i : I I ■ i .' . II l| I KM. Y ) : 5E T ( 1 I?. Y I :r,f I ' 1 l . I, I I ■ "I • i 
H40 FOP X=102TO114STEP IX.1D1NEX1 

• FOR T-3T0itSTEP2«SET(i»2.y)i8E7«ll4,Y>sNEXT 
B60 PR INI J1R1 .1 .HP*' 152>iCHR*( 153) |CMR»< 1 44 ) J 

6T081 »3E1 ' • . •: ' • , 11 • «NEXT 

B80 FOR X = 0TOI :SE1 ■ >« '4.4> :9ET(X»82,4> ;:ri' X' '4. 10 i 
: Ml > I « 

H90 SET«73.5)«SET<73.9)tBET(72,6)iSET<7; ,Q)iSI I • '», l«9l I " 1 . ' 
.i i (84, - ' i I (SET (86, 7) 

900 PR INT .11 ■' 

910 I'H, ■ ' ' '. ' I ■ ' : ' I I i • . I ' : -I 1 i. * . ft ) SF I ' « . I.I • : ,1 I " . 1 • ! Nl ' I ' 
920 PRINia332." -•• 

fie PRINT8396,"REDACA0 "I HICR1 TENA I >REP 1COLO6UI i'i I 

1NATARI0' ' ' 

940 PR1NTS?43."PAR AVI" -:i IRJ ■■ 45HNEX1 

950 PRINTa460."Tci II | I I ll • . I,.' 

Vft© PRINT3469. "ENTER"] 

:A*-INKEY»»II A*="".9A0 h ii ASC(A*I 'I <*M 

97* RCIIIPN 
ENO 

ROT l/.'-'i Dl ' OH f .*if..i l«l, -80 I I I 
• .-.' t !V«STRINGV i. 

600 |0 " -"mi. I' IR(71' 

&0040 |. -i'i | i i.j.i . 
40050 n I I I I ■ 

I I '..• -fi: Ii I ' ,MI •'! | 

■ roRi i '"I i 

ft0080 PI .," ■ :l "1 i I ■ 

■ 00 •'.• NEXTJ 

.-.0100 P0KE1652J .1 :l 0) I 1652 ' ,M 

(01 10 DATA '0',. 127, (0,62 ill.,'.. 

60120 DATA4 ,230, I. (11, 55, I I, -I*. 4 

^01 :i» Willi • i 

60140 PL ruRN 



310 i OR 

820 FOR 



Ii .11 



:ni ' I M 
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Sinclair Sinclair Sinclair sine 



Verbando 



Edson Noboru Yamada 



programa "Verbando", como sugere o proprio nome, tem 
como principal objetivo ensinar verbos regulares da lingua 
portuguesa. 

micro utilizado devera ser compativel com o ZX 81, com 
16 Kb. Podera, contudo, com algumas modificac5es, rodar em 
qualquer outro equipamento que utilize a linguagem BASIC. 

programa na"o so podera demonstrar como se conjugam 
os verbos, como tambem dar exerci'cios, inclusive com um pe- 
queno placar para uma maior motivaca'o. 

DIGITAgAO 

Com o auxflio do comando E do Micro Bug (utilitario para 
Sinclair, MS n ? 33), construa uma linha REM com, no m mi- 
mo, 91 ou mais caracteres. Feito isto, com o comando M do 



Micro Bug (MS n ? 32), digite a rotina SCROLL, fazendo uma 
minuscula modificacSo: no endere90 16514, digite o codigo 
00 e depois digite a rotina normalmente, iniciando no endere- 
90 16515 (que deve conter o codigo "2A" etc.). Isto foi feito 
para diferenciar a linha REM de um comando DATA simulado 
(vide, para maiores detalhes, o artigo DATA, READ e RESTO- 
RE no TK, de autoria de Ronaldo de Almeida Santos, publi- 
cadoem MS n 9 25). 

Atenca"o: N3o deixe de digitar as linhas com o comando 
REM ; elas nada mais sa"o do que DATA simulados. 

E por falar em verbos, voce saberia conjugar os verbos zin- 
cografar, azorragar ou ainda uranicoplastiar? 

Bibliografla 

CEGALLA, D. P. Novissima Gramdtica da Lingua Portuguesa. 



1 G05UB 1500 


210 


LET PX = X 


TO 480 




15 PAST 


£20 


PEM PPES. IND. .PRET. IMP. INC . 


500 FOR F=l TO 32 




16 LET X =16503 


PRET . PERF . IND . PRE I +UUE PhP^ . F 


510 LET L=USP 16554 




17 DIM T|<11, IS) 


UT DO PPES INDi PUT DO PRET.IND . 


520 NEXT F 




20 DIM PS (6,4) 


PhES 


DO 5UEU. .PRET. IMP. SUB J. . FUT 


530 IF Z$='l" THEN GOTO 0260 


30 CIM '.'$'. 3 .6, 11 .Si 


.DO PPE5. , IMPERPTIUO PFIRMPT , IMP 


540 IF Z*="2" THEN GOTO 0320 


so pem ,nf . p.pmos,pis.pm,pup 


ERPTIUO NEGPTIU 


550 IF ZS="3" THEN GOTO 400O 


PVPS . PUP,PUPM05,PUEIS .PUPM.EI Pi 




FOR F=l TO 11 


1499 STOP 




TE OU . PM05 , PSTE5 , PRPM , RPR . PRRS P 


i^ = 


G05UB 9000 


1500 SLOU 




Rfi PRPM05 .PPEI5 .PRAM .PRE I PRPS ,fi 


^2 . 


-ST TJ.F sX| 


1501 PRINT PT 3,0,"** 


'.' E P 


RP,PREM05.PPEI3 PPPO ,PRIP ,PRIPS , 


£24. 


NEXT F 


B P N D **" 




PR IP .PRIPM05.PPIEI5 ,PRIPM,E,ES,E 


230 


SLOW 


1510 PRINT PT 13,3." + EDSON NOB 


EMG5 , EIS EH P55E .PS5E5 ,PS5E . P55 


24.0 


GOTO 400O 


ORU YPMPDP * " 




EMOS . PSSEI3 PSSEM .PP .PRE:? .PR , PRM 


250 


PRINT PT 5 ,4, •'UERBO-' 


1512 PRINT PT 16,9;"- 


19 8 4 


05 , PRDE5 , PREM 


270 


Input cs 


_•• 




55 PEM . P . E . EMOS . PI . EM . ES E . E 


2^5 


IF lEn C*s2 THEN GOTO £70 


1513 FOR F=l TO 100 




MOS .EI3.EM 


230 


LET R$=C*lLEN C$-l TO ) 


1514 NEXT F 




50 PEM 0,E5 . E .EMOS EIS .EM . IP I 


255 


IP PS= PR THEN LET CU=1 


1520 FOR F=l TO 15 




PS . IP IPH05 , IEIS . IPM , I .E5TE , EU E 


2'50 


IF R$="EP THEN LET CU=2 


1530 LET K=U5P 16530 




MOS . ESTES ERPM . ERP . ERPS . EPP . EPPM 


:oo 


IF R$="IR" THEN LET CJ=3 


1640 NEXT F 




OS .EPEI5 ,EPPM .EPEI .ERPS .EPP . EPEM 


310 


LET P$=C$' TO LEN CS-21 


1650 PRINT PT 2.0; "« 
OU CPPPCITPDO P U 


PGORP EST 


OS EREI5,EPP0,ERIP.ERIPS,ERIP ,ER 


:2c 


PRINT PT .0, "TEMPO"" 




IPM05 .ERIEI5 .ERIPM . P,PS,P.PM03 P. 


:-2-s 


GOSUB 2300 


E TE ENSINPR UERBOS 




15 , RM .ESSE .ESSES ,E55E .E5SEMOS ,£S 


3 30 


INPUT N 


PORTUGUESP. " 




5EIS,E55EM.EP,EPE5 . ER . ERMOS . EPCE 


331 


IF N.-l OR N>11 THEN GOTO 33 


1650 GOSUB 2500 




3 .EPEM 







1670 FOP F=l TO 32 




65 = EM E P .PMOS, EI . PM . .PS P P 


-C; 


CLS 


1680 LET L=U5P 16579 




MOS, PIS PM 


405 


PRINT PT 4,0,T$INi:PT 7.0 


1690 NEXT F 




70 PEM O.ES.E, IMOS.IS .EM, IP . IP 


406 


IF N=10 OR N=ll THEN GOTO 4 


1700 PRINT PT 2,0: " 




5. IP IPMOS. IEI3, IPM . I , ISTE . Iu IM 


40 




NDICPTIUO. P05S0 




05 , I5TE5 , IRPM . IPP . IRP5 , IPP . IRRMC 


410 


FOR F=l TO 6 


NOS 5EGUINTE5 


TEMPOS ' 


3 . IPEI5 • IRPM IREI . IRPS, IRP , IREMG 


411 


IF N=~ THEN PRINT "QUE 


PT 3,0, ", PPESENTE" . 




S . IPEI5 . IRPO, IPIP . IPIP5 . IRIP := I 


■11 = 


IF N=3 THEN PRINT "5E "; 


ITO IMPERFEITO".', PPETEPITO PE 


PM05.IRIEI5 IPIPM ,P .PS.R ,PM05 PI 


413 


IF N=9 THEN PRINT "QDO "i 


PFEITO".", PRETEPITO 


MPIS-OUE-P 




420 


PRINT P$(Fi 


ERFEITO a FUTURO DO 


PPESENTE 


EIS ISSEM IP . IRES . IP , IRM05 , IRDE5 


430 


NEXT F 


"■ FUTURO DO PPETEPITO" 


, IREM 


431 


IF N<10- THEN LET PS=9 


1710 GOSUB 2500 






440 


IF N=10 OR N=ll THEN LET P5 


1720 FOR F=l TO 22 






=0 




1730 LET L=U5P 16515 




80 CEM EU . TU ELE . NOS . UOS . ELEr 


441 


FOR F=l TO 6 


1740 NEXT F 




100 FOR F=l to 3 


450 


PRINT PT 6+F PS, 


1750 PRINT PT 2.0." 






451 


IF iN = 10 PND F = li OR i.N = li 


UBUUNTIUO, P05S0 


CONJUGPR 




AND F=li THEN GOTO 460 


NOS 5EGUINTE5 


TEMPOS 




452 


IF N=ll THEN PRINT "NPO ". 


1755 PRINT PT 9.0, "i 


PPE5ENTE ■ 




455 


PRINT P$, US i.CJ,F,N) . " 


. "■ PRETERITO IMPERFEITO".". 


145 IF lEN x$>9 THEN STOP 


45S 


IF N=10 OP N=ll THEN PRINT 


UTUPO DO PRE5ENTE" 






"l",P|i.Fi . ') 


1760 GOSUB 2500 






460 


NEXT F 


1770 FOR F=l TO 32 






470 


PRINT PT 16,3, "B - NOUO UEP 
TEMPO", TPB 3."H - NOUO TEMP 


1730 LET L=U5R 16554 






BO E 


1790 NEXT F 






0" .TPE 3. "§ - MENU" 


1300 PRINT PT 2,0; " 


NO MODO I 




430 


LET 2S=INKEYS 


MPERPTIUO . P05S0 


CONJUGPP 




490 


IF Z*'"i" OR ZS>"3" THEN GO 


NOS 5EGUINTE5 


TEMPOS 



1510 PRINT PT 

PFIRMPT I'.'O' 
TIVC 

1520 GOSUB 2500 

1330 FOP F=l TO 22 

1340 LET L=USP 165 30 

1550 NE«T F 

1860 print pit 2 0; 
eu ppenps conjugo 
dos 'jepbos 

:epcp de 6 mil 

15"0 PRINT RT 7.0 

rbos que eu npo 
sop 

1875 CPINT 
18 80 PRINT the . ' 
PUEP . FICPC, 
RGUEP E DEMPI5 



TEPMINEM EM 

1890 PRINT 

1200 PRINT 
5CRIT05 5EM 

"I- E 
OGRRFICOS 



:-. 



0. ■ IMPERPT I'.'O 
IMPEPPTIUO NEGP 



PTENCPO 
P MPIORIP 
PEGULPRE5 
UERBOS. 

EIS PLGUN5 .'E 
CONSIGO CON-JU 



SER , TEP . H 
PROTEGEP , E 
','EPBOS OUE 

G , ETC . 



OS UERBOS SEPPO E 
PCENTO, CECIDILHH 
OUTRO 5 3INPI5 OPT 
DE NOSSP LlNGUP. 



1910 GOSUB 2500 

1920 FOR F=i -0 32 

1930 _ET LbUSR 16579 

1940 NEXT F 

1950 PRINT PT 2 4, ■PGUPPDE R1.GUN 

3 IN5TPNTE:- - OUE EU P055P 

MEMORIZRR OS UERBOS 

1960 GOSUB 2500 

1270 FOR F=l TO ii 

1930 LET L=U5R 16515 

1990 NEXT F 

2000 RETURN 

24^9 rTOP 

2510 PRINT PT 20.0 



PRRfl lONTINURR 

2530 IF irjr E. S 
2540 PRINT RT 20.0 



= 5 a: ppi-jt p.- 



a 



« PPESSION 
■I NEU LINE 

"HEN RETURN 

■■ TRB 0. ■ 

. '■ TPB "» 



254 4 for P = i to 3 

2545 NEXT = 

2550 IF INK.EYS' "" THEN RETURN 

2560 PRINT PT 2 . . "1"|" . TPB U 

1-E ~0 GOTO 2510 

2500 PRINT pt 2 



2 5:0 =:■:■.- 

!S20 PPINT 



TRE 

.TPE 
TPB 
RFEITO 



TPB 0. "1 - PPESENTE 



- PPETEPITO IMPEPFEITO ' 
"3 - PRETERITO PERFEITO'. 
4 - PRETERITO MP I 5 -QUE -PE 



TP6 



3ENT5" ThB 
ERITO' 
2330 PPINT 
2340 PRINT 



5 - FUTURO DO PRE 
6 - FUTURO DO PPE T 



:5 50 PPINT 
2860 PRINT "7 - PPESENTE .TPB 0. 
"8 - FRETEPITO IMPEPFEITO" , TPB O 
. "9 - FUTURO DO PPESENTE " 
2870 PPINT 
!30 PRINT 



TECLE N» DO TEMPO 



2590 PPINT 

2900 print io- pfirmp - :.: 

- 'JEGPTIVO ' 

29.10 PRINT 

2920 PPlriT 

E NEU LINE' 

2930 RETURN 

4000 C£M MENU 

4010 PPINT w T A 

E N U + 

4020 PRINT PT 5.4, "B - CONUUGPP' 



.1 



, 4 



PT H.4., 



- E-ERCICIOS" , PT 14 



4090 
ft 10 

4200 



- FIM 

4030 LET 2S = INP.E'i S 

4040 IF ZS=' THEN GOTO 4030 

4050 IF Z$ ' 1" OP ZS,'3" THE'. BO 

TO 403 

-1050 FOP 3=1 TO 19 

40-0 ^E - '' SC =U5P 16530 

4080 tJE Y T 5 

IF ZS= 1 THEN GOTO 260 
IF Z$= 2 THEN GOTO 5000 
IF ZS = "3" THEfl STOP 

4999 STOP 

5000 PEM E»ERCICIQS 

5010 PRINT RT Z,9;'">X- E X E P 

5020"P'PINt"pT 4,0. "QUE UEPBO DE5 

EJP" 

5010 INPUT OS 

5035 IF LEn OS :2 THEN GOTO 5030 

5040 LET P$=OS> TO LEN 0S-2i 

5050 i-ET :s=OSlLEN 0$-l TO I 

CS= PR' THEN LET CU=1 
IF CS= EP THEN LET CU=2 



5060 

50-0 



5030 IF CS= IP THEN LET CU=3 
5090 CLS 

5100 -PINT PT o 0."EM QUE TEMPO" 

5105 LET ct = o 

5110 GOSUB 2500 

5120 INPUT N 

5125 IF N-l OR N 11 THEN GOTO 51 

20 

5.:o :.; 

513S PPINT RT 3 O.TSlNi 
5140 FOP F=l TO 6 



5150 
5160 
5152 

5 16 3 
51-0 
5 150 
5190 

5ir5 

PND 

PO E 

5200 

PNC 

5210 

F 0, 

5212 

5214 

5218 



PRINT PT 4+F.3, 

IF N=- THEN PRINT 

IF N=8 THEN PPINT 

IF N=9 THEN PRINT 

PPINT PS'Fi 

NEXT F 

FOR F=l TO 6 



'QUE 
"SE ' 

.;:■: 



Q^: iN = 11 



N=10 PND F=l) 

Fall THEN PPINT PT 4+F,U 

ISTE" 

IF (N = 10 PND FalJ OP IN-all 

F = l.i THEN GOTO 5300 



PRINT PT 4*F-1 0. 



, PT i- 



Input o$ 
GOSUB 6000 

0$=, $ THEN PRINT PT 



at 

5213 IF 0$=,S THEN LET PT=PT+850 
5220 IF 0$ vj THEN PRINT RT 2 1 



4 + F . 12, -'S 
20 PT P0NT05 

"0 15 



;i ,o 



H - NOUO '.'EP 
3 - NOUO TEMP 



THEN :-c 



5230 PRINT -^ 

5240 PRINT -~ 

5250 FOP E=l " 

5260 NEXT E 

5S.-Q PRINT PT 

5300 NEXT F 

5310 PRINT PT 14.5 

BO E TEMPO" . TRB 5. 

0" .TAB 5 . "g - MENU ' 

5320 LET Z5=INKE;S 

5330 IF ZS I ■ OP ZS 

TO 5 320 

5340 FOP Fsl TO 32 

5350 ..ET L=U5R 16579 

5360 NEXT F 

53-0 IF ZS= 1 THEN GOTO 5000 

5380 IF Z$= '£" THEN GOTO 5100 

5390 IF Z$="3" THEN GOTO 4000 

5999 STOP 

6000 LET VS=PS + I .'S iCJ F N-i 
6010 LET OS=OS* 

6020 LET 0$=OSi TO LEfJ vj 

6050 RETURN 

3993 FAST 

3999 STOP 

9000 IF PEEK >=I1S OR > =16505 "- 

EN GO SUE ■^■C'zC 

9010 LET «( = •■■■ 

9020 lET .=x+1 

9030 IF PEEK y=25 OP PEE^ -=118 

THEN PETUPN 

9040 LET ■$ = x$*CHR$ PEEK .< 

9050 GOTO 9020 

3060 LET *=*+5 

9070 IF PEEK -=234 PND PEEK (X*i 

I THEN RETURN 

9030 LET X=X+PEEK i ' -2' +256+PE5I- 

(X-li +4 
9090 GOTO 9070 
9100 PEM PPOGRPMP 

EDSON NOBORU YPMPDP 

9105 PEH E5TR DE ITPQUERR , 174 

9106 PEM 03200, SPO PRUL0/5P 

9107 PEM 

9200 PEM SCROLLER 

EDGPPD COSTP CPMPOS/PU 

9300 REM REPD DPTP -RESTORE 

RONALDO DE P. SPNTOS 

9301 REM 

9302 REM FIM 
9993 SPUE UERBRNDg" 
9999 PUN 



Listagem BASIC 





OC 


- fl 


0" 


40 


ES 


11 


21 


0? 


16522 


z. 


01 






>'.-. 


Et 


B0 


_ - 


15530 


3R 





4,' 




r- 


>.■-- 


09 


11 




21 


OO 


ES 


19 




EB 


EI 


Be 


18=45 


RF 


U<f 


-V 




77 


10 


PC 


. r 


16 FF4 


2P 


0" 


40 


. 


IF 


00 


3E 


16 


16562 


C5 


v 1 - 


h u . 


:■ : 


: ■ 


:.• 


b: 


2 j- 


16570 


70 


0E 


20 


0'- 


-■i. 




'-: 


18 


16 c ~.=- 


EF 


--, 


i,ii 


40 


it 






IP 


lizci- 


00 




ES 


Dl 


D'?. 


- 


ED 


BO 


16594 


25 


"0 


CI 


-L 


-Z 


= -• 


i-- 


Fl 



Rotina SCROLL 



.*, 



Edson Yamada tem 14 anos e atualmente cur- 
sa o primeiro ano de TGcnico em Processa- 
mento de Dados, na Escola Tticnica Industrial 
Lauro Gomes. Desenvolve ainda programas 
em BASIC, Pascal e Assembler, nas linhas Sin- 
clair (ZX81), ZX Spectrum e Apple e nas cal- 
culadoras HP 11Ce 15C. 
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[Rl^gDATA 



LIDERANQA EM TECNOLOGIA 
VOLTADA PARA VOCE 

APRESENTA 

r OCOMPUTADOR ^ 
PRONTO 

CP-500 com duplo drive, dupla 
memoria (128 kbytes), 30 ve- 
zes mais vetocidade (4mhz). 
com caracteres de acentuacao 
implantados. (EXCLUSIVIDADE 
PLEXXUS) aistema integrado 
com a impressora para folhaa 
indtviduais ou continuas. 
Total comunicacao micro a mi- 
cro e com os demais sistemas. 
Um completlssimo rol de softs, 
(850 programas), para fazer de 
seu computador um instrumento 
proftssional. Processadores de 
texto (maquina de escrever ele- 
trfinica vai parecer coisa do pas- 
sado), planilhas eletr6nicas, 
agenda processual integrada, 
biblioteca,...etc 

Preco imbativel e totalmente fi- 
nanciado. 



Implantamos, instalamos, trei- I 
namoa, opar amoa, apoiamoa. 

TELEFONE 

^ (011)34-4016-37-2344. 

show-room 

rua marla paula. 36 - 1 » and. 

sao paulo. 



if I;CEHIWLDA1I 



SUPRIMENTO E 
COISA SERIA 



• DISKETES: 5 1,4 e 8" e fitas magneticas 
- marca DATALIFE VERBATIM 

• ETIQUETAS PIMACO PIMATAB 

. FORMULARIOS CONTINUOS E PASTAS 
. FITAS PIMPRESSORAS EM GERAL 
. ARQUIVOS PARA DISKETTES 



PRODUTOS COM 

GARAIMTIA 

E EIMTREGA 

IMEDIATA 



AV. PRES. VARGAS N° 482 GR 201 203 

Tel.: KS (021) 253-1120 

Telex: (021) 34318 




Sinclair Sinclair Sinclair sine 



Geografia 



Mauricio Salomdo Jardini 



Elaborado com espi'rito de jogo, este 
programa tern como proposta exercitar 
o conhecimento da localiza$3o geogra- 
fica de determinadas cidades dentro do 
mapa do Brasil. Criado para crian?as que 
')& tenham conhecimento do que seja 
Norte, Sul, Leste e Oeste; inclui tambem 
outras cidades importantes. 

programa na"o determina uma 
local iza<;So precisa dos lugares, mas sim 
urn posicionamento em rela9<Io aos 
pontos cardeais, litoral, interior e a 
memorizacao dos nomes. Devido a bai- 
xa resolu93o, algumas cidades coinci- 
dem em determinadas coordenadas. 
Assim, se o computador por acaso as 
escolher, so lhe restara entSo. . . um 
chute! 

Originalmente estruturado para o 
ZX81, ele e compativel com todos os 
micros desta mesma linha e facilmente 
conversivel para o BASIC dos outros, 
podendo ainda ser jogado entre amigos 
ou ate mesmo na sala de aula. 

EXPL1CANDO PROGRAMA 

Linhas 10 e 20 - apresenta9ao. Cha- 
mam a sub-rotina de desenho do mapa. 
Nesta sub-rotina. cada linha PRINT cor- 
responde a impressao de uma das 21 
linhas da tela. Entretanto, a partir da 
listagem, e possi'vel, ao inves de escre- 
ver CHRS 3, colocar o seu equivalente 
grafico,"H "o que acelerara a impressSo 
e diminuira a satura9ao de memoria. 

Linhas 40 a 110 - regras do jogo e 
apresenta9ao das cidades programadas. 

Linhas 1 20 a 620 - reserva de espa- 
90 na memoria; defini9ao das 40 cidades 
programadas e variavel "apagador" G$. 

Linhas 630 a 730 - o computador 
vai printar. na tela, as cidades progra- 
madas, uma a uma, de maneira que o 
jogador possa memorizar o nome e a 
posi92o corrcspondentc. 

Linhas 735 a 750 - zera a contagem 
e convida ao infcio do jogo propria- 
mente dito. 



Linhas 752 a 780 - o mapa e redese- 
nhado e o contador e a pergunta apare- 
cem do lado direito. 

Linhas 790 a 1000 - duas cidades 
vao ser escolhidas aleatoriamente e uma 
delas tera* sua posi9ao piscando na tela. 



O quadro de controle pedira uma res- 
posta, quando, entao, podera ser dado 
ao computador o niimero escolhido. An- 
tes de entrar com o numero, uma tecla 
qualquer devera ser pressionada para 
interromper o circuito de espera, fa- 



1 PEH "SEC'GPAFIA I" 
5 PEM B.- M.5.JARDINI 
10 GOSUB 1250 
20 PAUSE 500 
30 CL5 

40 PPINT <.»OCE UIU UM HAP A DO 
BPASIL.' - 
50 PRINT 

60 PRINT 'UM PONTO Ufil PI5CAP 
NO HAPA HOS-TRANDO UHA CIDADE.AO 

LRDO APARE-CEPAO DOIS NOMES DE 
CIDADES ICOMSEUS NUMEROStE UOCE 
DEUEPm E5C0-LHEP A CIDRDE QUE CO 
RPESPONDE ROPONTO NO HAPA." 
70 CRINT 
75 PAUSE 500 

•30 PRINT "0 NUMERO QUE VOCE E5 
COLMEU SEPA CONFEPIDu PELO COMPU 
TADOP E . SE ESTIheR CERTO , UOCE 
MARCAPA UM PONTO. SE ESTIUER ERR 
ADO ELE VAI H05TRRP A RESPOSTA C 
EPTA. ' 

*0 PPINT 
95 PAUSE 500 
100 PRINT "PRE5TE ATENCAO.POIS 
AGORA MAPAVAI 5EP REDE5ENHAD0 
E TODAS AS CIDADES PROGRAMADAS 
VAO APARECEPUMA POP UMA DURANTE 
5 SEGUNDOS." 
102 PRINT 

105 PRINT "(aa 0UESTOES'" 
110 PAUSE 1500 
120 CLS 

130 DIM F$ 14.0, 18) 

140 LET F$ < ll ="31145A0 PAULO" 
150 LET F»i.2l ="3515RI0 DE JANEI 
RO" 
160 LET F$i3> = "2722BRASILIA" 
170 LET F$ 141 ="2707PORTO ALEGRE 



420 
450 
460 
470 
49C 
500 
510 
5 2C 
530 
540 

ETO" 
550 
570 

NDE" 
580 
610 
620 



LET F$'2Si 
LET F$'29' 
LET F S '.30' 
LET F»«315 
LET F$'32' 
LET FS'33' 
LET F$ 134.1 
LET F$i35.i 
LET F$<36' 
LET F*I37' 



r"2730MARABA" 

r"2440AMAPA" 

:' - 2715BAURU" 

:"3015CAMPINA5" 

:"2621ANAP0LI3" 

:"2513L0NDPINA" 

:"3532S0BRAL" 

:"2305BAGE' - 

:"3621ILMEUS" 

:"2716RIBEIRA0 PR 



LET F$ (38' ="2710UOINVILE" 
LET FS <39> ="3931CAMPINA GPA 

LET F$i40i ="3932MACAU" 
DIM G$<1,18> 

LET GS' 1) =" 



VAMOS COMECA 



130 
TE" 
190 


LET 


F« 15; 


="2917BEL0 HORIZON 


LET 


r i 6 


"2711CURITIBA" 


200 


LET 


FS'7) - 


"SeiSVITORIA" 


210 


LET 


FJI8) 


"36235AL'v'AD0R" 


220 


LET 


F S 1 9 1 


"3825ARACAJU" 


230 


LET 


F$'10 


="4130PECIFE" 


.-~C 


LET 


F t 1. 1 1 . 


="4032NATAL" 


250 


LET 


F$ .12 


= "3734F0RTAl_EZA 


260 


LET 


Ff (13 


="3334SA0 LUIS" 


270 


<_ET 


FSU4 


="2735BELEM" 


280 


LET 


F*C1S 


="1533MANAU5" 


290 


LET 


F$ 1 16 


= "2120CUIABA" 


300 


LET 


F$ 117) 


= "1916C0RUMBA ' 


: ie 


LET 


F$ US. 


= "2621G0IANIA" 


32c 


LET 


FJ '19 


="4031JOAO PESSOA 


330 


LET 


F$ .20 


="0725PIO BRANCO" 


240 


LET 


F$ .21 


="3431TERESINA" 


350 


LET 


F$ .22) 


= "2709F|_ORIANOPOL 


360 


LET 


FS ' 2 3 


="4023MACEIO" 


370 


LET 


FS '24) 


="2433MACAPA" 


: so 


LET 


F S 1 25 


="1339B0A VISTA 


390 


LET 


FS '26' 


="1327P0RT0 VELMO 


410 


LET 


Ft 1873 


="2034SANTAREM" 



630 FOP N=l TO 40 
640 GOSUB 1250 
650 LET XrVAL F$iN.l TO 2> 
560 LET V=VAL FS (N . 3 TO 4) 
670 PRINT AT 19,17:FS(N.5 TO 
680 FOP P=l TO 60 
690 PLOT x,Y 
700 UNPLOT X,Y 
710 NEXT P 

720 PRINT AT 19.17.GS'. 1' 
730 NEVT N 
735 LET 5=0 
740 CL5 

745 PRINT AT 10,9, 
R-?" 
750 PAUSE 250 
752 CL5 

756 FOR 0=0 TO 12 
758 PRINT AT Q . 22 . 

760 NEXT 

761 PRINT AT 0,22. 

762 PRINT AT 3,22. 
754 PRINT AT 4,22. 
768 FOR N=l TO 20 
770 PPINT AT 1.26.N 
780 GOSUB 1250 

790 LET V=INT (RND+40) +1 
800 l_ET T = INT <RND*40) +1 
610 IF T=V THEN GOTO 800 
620 LET X=VAL FS<V,1 TO 2i 
3 30 LET r=VAL FS<V,3 TO 4) 
860 LET H=INT IRND*2)+1 
570 IF M=l THEN GOTO 910 
680 PRINT AT 19, 14, V. AT 19,15 

-" . FS ".' 5 TO ) 
£90 PRINT AT 20 , 14 , T , AT 20.16. 

-", FS'T.5 TO ' 
900 GOTO 930 
910 PRINT AT 19, 14, T, AT 19,16 

-" F$T.5 TO ' 
920 PRINT AT 20, 14, V. AT 20.16. 

- " .FS ' V,5 TO ) 
930 FOR P=l TO 20 
940 UNPLOT X , v 
950 PLOT x. . v 
960 NEXT P 
970 PRINT AT 5,22, 
980 PLOT X , y 
990 UNPLOT X , V 



1000 IF INKEi'S= " - THEN GOTO 980 


1188 INPUT 1$ 


1010 INPUT ZS 


1190 CL5 


1020 IF CODE ZS-29 OR CODE ZS 37 


1192 IF IS=CmP$ 38 THEN GOTO 10 


THEN GOTO 1010 


1194 1=- IS=CHP$ 39 THEN GOTO 100 


1030 LET Z=VAL Z$ 


1196 IF IS=CHP$ 40 THEN GOTO 735 


1040 IF Z :•'.' THEN PRINT AT 7.22 


1240 REM SUBROTINA MAPA 


8w>9SdHKt 


1250 PRINT AT 0, 5. CHRS 131.CNPS 


-C:0 IF Z='.' THEN PRINT AT 7 , 22 


4 


H-Utt' 


1260 PRINT TAB 5.CHR$ 6.CHPS I 


1060 IF Z = '.' rt£N L £^ ;=.: + ! 


HPS 5. TAB 10, CMP $ 135. CHRS 2 CMP 


1l?l7l7l COTMT iT i ^3 ^fM^ffi " T 


S 4 


11 24, 3. " ,'". N 


1270 PRINT TAB 5.CMPS 134. CHRS 


1050 IF Z=V THEN PPINT AT 16 1" 


.CMPS 134 CHRS 131.CHPS 6. CHRS 1 


FS 'V .5 TO ' 


.CHRS 135. CHRS i.CHPS 131 


1090 IF Z •■. ■■'.' THEN PPINT hT 21,0. 


1230 PRINT t 0B 2;CHP$ 135, CHR$ 6 


iiiimwi ; v. --•■ . f«iv =; Tii i 


.CHPs 131; CHR* l.TAB 11. CHRS 6 C 


1095 FOR p=i TO 60 


HPS 2, CHRS l.CHRS 131; CHR$ 4 


1100 PLOT • i 


1290 PRINT TR5 2. CMPS 133. TAB 11 


1104 UNPLOT . 


.CHRS 2, CHRS 134. CHPS 6. CHRS C 


1105 NEXT P 


HP$ 2. CHRS 134. CHPS 131. CHRS 131 


1110 PRINT AT .._ n _- H|| g 

iii=; pptnt ot F. »s ^mmn 


1300 PRINT TAB 2. CHPS 133 TAB 19 


.CHRS 134, CHRS 4 


1120 PRINT AT 16,17,GS(1,4 TO 1 


1310 CRINT TAB I.CHPS 135. CHRS 1 


AT 19 , 14. GS i .li . AT 20.14.GS(H 


.TAB 20. CHPS 134 


1125 IF Z V THEN PPINT AT 21.0. 


1320 PRINT TAB l.CHRS 5 , TAB 20 C 


GS U' +GStl . 1 TO 8) 


HRS 5 


1130 NEXT N 


1330 PRINT TAB l.CHRS 5 . TfiB 4.CH 


1140 IF S.=S THEN PRINT AT 21.0, 


PS 135, CHPS 4, TAB 19, CHRS 133 


"NADA B0M.REVI5AR" 


1340 PPINT TRB l.CHRS 2. CHRS 134 


1150 IF S'S AND 5. =15 THEN PPINT 


.CHPS 131, CHRS l.CHRS 133, TAB 13 


AT 21,0;"MUTTO BEM.TENTE MELHOP 


.CHRS 135, CHRS 1 


AR ' 


1350 PRINT TAB 5, CHPS 3. CHRS 134 


1160 IF 5 5 15 AND S<=19 THEN PRIN 


TAB 18, CHRS 5 


T AT 21 ,0, "OTIMO.VOCE OUASE ACER 


1360 PRINT TAB 5 CHRS 130, TAB 18 


TOU TODAS" 


.CHRS 5 


1161 IF 5=20 THEN PRINT AT 21,0, 


1370 PRINT TAB 9, CHRS 132 . TAB 18 


"EXCELENTE.VOCE ACEPTOU TODAS" 


, CHRS 5 


1162 PAUSE 1500 


1380 PRINT TAB 9, CHPS 133, TAB l - " 


1164 CL5 


.CHRS 133 


1166 PRINT "PROXIMO CANDIDAT0" 


1390 PRINT TAB 9,CHR$ 133. CHRS 1 


1158 PRINT 


31. TAB 16, CHRS 131. CHPS 6 


1170 PRINT "ONDE VOCE OUER COMEC 


1400 PRINT TAB 11. CHRS 134, TAB 1 


fiR?" 


4, CHRS 135, CHRS 3 


1172 PRINT 


1410 PRINT TAB 11, CHRS 2, CHRS 4, 


1174 PRINT A-REGPA5 DO JOGO 


CHRS 135, CHPS 1 


1176 PRINT 


1420 PRINT TAB 11, CHRS 135. CHPS 


1178 PRINT "B-CIDADE5 PROGRAMADA 


l.CHRS 133 


S" 


1430 PRINT TAB 11, CHRS 5. CHRS 0. 


1180 PRINT 


CHRS 6 


1182 PRINT "C-DIRETO NAS ESC0LHA 


1440 PRINT TAB 11, CHRS 130. CHPS 

1450 PRINT rt U,0.'SW__ 
lAfiUI PPTNT QT Ifi 0\ If 0» H «fTMB 


1134 PRINT 

1156 PRINT APEPTE A LETRA E5C0L 


HIDA" 


1470 RETURN 



zendo aparecer " E " para depois enta"o 
se pressionar o numero. Para evitar que 
a resposta certa esteja sempre colocada 
na mesma posi9§o, existe uma variavel 
de controle "H" que muda esta posi9a"o, 
evitando que se possa responder sempre 
o primeiro ou o segundo nome. 

Linhas 1010 a 1130 - controle da 
resposta. Soma um ponto se est iver cer- 
ta ou apresenta a resposta certa, em caso 
de erro. 

Linhas 1140 a 1162 - comentarios 
em iun9a"o dos pontos obtidos apos 20 
questSes. 

Linhas 1164 a 1 196 - apresenta9ao 
das op9(3es de mudan9a de jogador - 
op9ao de vol tar as regras do jogo para 
quern chegou depois ou ainda nao en- 
tendeu muito bem, voltar as cidades 
programadas para uma nova memoriza- 
9ao ou ir diretamente para as escolhas. 

Linhas 1240 a 1470 - sub-rotina de 
desenho do mapa. 



Mauricio SalomSo 6 Engenheiro MecSnico 
formado pela FEI, em 1978, e trabalha em 
inspecao de qualidade de equipamentos para a 
Usina ie Tucurui em Grenoble, na Francs. 



Geografia 



Mu/tiusuario MTS/IV-M, da MAQUIS 

COM PRE UM ELEVE SEIS 




CD D 




Quando voce adquire um Multiusuario MTS/IV-M," 

esta na verdade adqui r indo a possibilidade de 

trabalhar com ate seis terminals ao mesmo tempo, 

utilizando somente uma Unidade Central de 

Processamento. 

Voce divide todo o seu trabalho por seis, e sobra 

muito mais tempo para todas as outras tarefas que a 

administracao de uma empresa requer. 

Cada um dos seis terminals ligados ao MTS/IV-M 

dispoe de 64K de memoria. Assim, voce pode 

executar inumeras tarefas independentes e 

simultaneas em cada terminal. O MTS/IV-M pode 

ser interligado a computadores de grande porte, via 

simulacao de terminals IBM, Burroughs, etc. 

Nao perca esta oportunidade. 

O MTS/IV-M e mais um Equipamento 
com o Padrao MAQUIS de Qualidade. 



.< ??_ J . 



"Compativeis com todos os Micros MAQUIS; 
Sistema Operacional MDOS-MB compativel com 
CP/M2.2; 

Pode acoplar como perifericos ate 4 acionadores 
de discos flexiveis de 5 1 /A" 800 KB; e/ou 
4 acionadores de discos flexiveis de 8" 1 .2 MB; 
e/ou 2 acionadores de discos rigidos Winchester 
de 5, 10, 40 e 70 MB (cada unidade). 



MAQUIS 



TECNOLOGIA 
[. SISTFM\s 



Av. Cal6g*ras, 6-B — »obr»lo|a — Cantro — RJ. 
T«|.: (021) 240-4934 

Av. do* Imarto, 909 — Indtanopolis — Sao Paulo — SP. 
Tala.: (011) 543-3511/543-3221/543-3752 
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Trs-80 trs-80 trs-80 trs-8 



Acentos 



Heleno F. Araujo 



Quern nao tern cao ca9a com gato, diz o velho ditado. Neste 
artigo tentaremos mostrar como os usuanos dos micros compa- 
ti'veis com o TRS-80 modelo III podem implementar alguns 
dos acentos da nossa lingua. 

Antes do programa propriamente dito, falaremos alguma 
coisa sobre os DCBs (Device Control Block), um nome pompo- 
so para algumas rotinas da ROM dos micros compati'veis com o 
TRS-80, responsaveis pelo tratamento dos perifericos. Aborda- 
remos este assunto num ni'vel suficiente para que se saiba usar 
os DCBs, particularmente o DCB da impressora. Caso voce 
esteja interessado em se aprofundar no tema, veja na figura 1 
os enderecos dos DCBs do TRS-80 modelo III. 

No total, os DCBs representam 24 bytes (8 para cada dispo- 
sitivo). Na figura 1 estao relacionados somente os dois bytes 
(LSB e MSB) dos enderecos do Driver (rotina da ROM) requisi- 
tado num dado momento para efetuar uma comunicacao com 
o periferico. Isto significa que, para imprimir um cardter, o re- 
gistrador C e carregado com o codigo deste cardter, e logo ap6s 
e chamada uma rotina da ROM localizada no endere90 0962 
(decimal). Veja os 2 bytes do DCB da impressora: 

194+(3*256) = 962. 



r.n •••• acentos 

60 ■■•« Cop.|r ighHc I198«. Heleno r. Araujo 

'0 'Este progrtmy, peralte gerar <C crdilha) r <tt c/tll>.na P-500 

u»»i.rto gualquer Editor de Textoa no CP-500 
8(1 'Execute prinriro rate prograiaa c depot* carregur leu editor. 

Voce conaegutra' oa caracteres na forna abalxoi 

90 '<G> >C crdilha, ninuaculo 

<0> >a con til, ninuaculo 

<N> )A con til, maiusculo 

< F) )C crdilha, ■alusculo 

100 CIS 

HO FOR N-0 TO 441REA0 11 tP0KE-25A»N. 11 :NEXT 

120 POKE 16422. CUPOKE 1 6423. 253« "Oravi a DCB da laprtMort 

130 POKE 145M .246IP0KE 16562 . 254 1 CLEAR 501 'Protege acaor 1 1 

140 FOR N-l TO 3000INEXTJNEU 

150 DATA 121.254.64.194.12.255.62.199.79.195.194,3,254,38,194,23 

.235.62,207,79,195,194,3,254,35,194.34.255,62,206,79,195,194,3.2 

54.37.194.194.3.62.198.79.195,194.3 



Listagem BASIC 







0050: 


ROTINR 


RCENTO VEPSXO 1.0 JUN/8A 






0060: 


Copyright <c) H»l«no F.RrauJo 






0070 


IriPCRP 


EOU 


03C2H 






0080 




ORG 


FFOOH 






0090; 








FFOO 


79 


0100 




LD 


R.C 


FF01 


FE40 


0110 




;> 


AOH 


FF03 


C20CFF 


0120 




W 


N2 . FFOCH 


FF06 


3EC7 


0130 




LB 


R.C7H ;Troc* p/Crd.nin. 


FF08 


AF 


01A0 




LD 


C.P 


FF09 


C3C203 


0130 




JP 


I1PCBP- 


FFOC 


FE26 


0160 




CP 


26H 


FFOE 


C217FF 


0170 




JP 


N2.FF17H 


FFll 


3ECF 


0180 




LD 


B.CFH )Troc» p/a c/til 


FF13 


kF 


0190 




i D 


C.R 


FF1* 


C3C203 


0200 




JP 


IMPCHR 


FF17 


FE23 


0210 




LP 


23H 


FF19 


C222FF 


0220 




JP 


NZ . FF22H 


FF1C 


3ECE 


0230 




1 D 


R,CEH;Troc« p/O c/til 


FF1E 


AF 


02A0 




LD 


C.R 


FF1F 


C3C203 


0250 




-* r 


IMPCRR 


FF22 


FE25 


0260 




CP 


25H 


FF24 


C2C203 


0270 




JP 


NZ, IMPCRR 


FF27 


3EC6 


0280 




LO 


R.C6H 


FF29 


AF 


0290 




LD 


C.fl 


FF2R 


C3C203 


0300 
0310 




JP 
END 


IMPCRP 



DISPOSITIVO 


ENDEREgO 


CONTEUDO 






VfDEO 


16414 


115 'LSB 


DO 


DRIVER 




16415 


4 'MSB 


DO 


DRIVER 


TECLADO 


16406 


36 'LSB 


DO 


DRIVER 




16407 


48 'MSB 


DO 


DRIVER 


IMPRESSORA 


16422 


194 'LSB 


DO 


DRIVER 




16423 


3 'MSB 


DO 


DRIVER 



Figura 1 

Agora tudo que se tern a fazer para trocar um cardter a ser 
impresso por outro e justamente INTERCEPTAR a chamada 
da ROM, mandando-a para uma rotina criada por voce, que 
tratara' a informacao a ser impressa antes da mesma ser envia- 
da para a impressora. 

programa acentos faz exatamente isto. Voce digita um ca- 
rdter, e a impressora imprime outro. Ele troca: 

<@> por <C cedilha> minusculo; 

<& > por <a com til> minusculo; 

<#> por <A com til> maiiisculo; 

<%> por <C cedilha> maiiisculo. 

De posse das listagens em Assembler e BASIC, fica fa"cil 
voce implementar o programa, substituindo e/ou acrescentan- 
do outros caracteres da lingua portuguesa. Na listagem em As- 
sembler, o segundo byte dos codigos das linhas 130, 180, 230 
e 280 correspondem aos valores hexa dos caracteres da impres- 
sora P-500, da Prol6gica. Para usar o programa com outro tipo 
de impressora, verifique os eddigos dos caracteres que voce de- 
seja usar no manual de sua impressora e depois substitua os by- 
tes das linhas mencionadas. 

COMO USAR PROGRAMA 

Se voce optar pela listagem em BASIC, basta digitar o pro- 
grama e dar um <RUN>. Ele fica numa drea protegida, mas 
voce nfo precisa se preocupar com isto. pois este detalhe foi 
incorporado na listagem BASIC. Caso voce entre com o progra- 
ma usando o Monitor, faca o seguinte: entre com os c6digos 
em Hexa diretamente no Monitor. Reset o micro e responda 
com um valor inferior a 65280 a questao da Mem. Usada?. A 
seguir, no modo imediato do BASIC, digite: <POKE 16422, 
OPOKE 16423, 255>. 

unico inconveniente desta rotina e que, apesar de voce 
conseguir estes caracteres na impressora, tera" que se acostumar 
a digitar e ver no video o si'mbolo de arroba como se fosse um 
C cedilha, assim como os outros caracteres substitui'dos. 



L istagem A ssem bier 
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Heleno F. Araujo 6 funtion&rio publico e hi cerca de dois anos co- 
mecou a se interessar por microcomputadores. Atualmente possui um 
CP-500 e uma impressora P-500. 
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A Compumiqo 

vai debar voce 

com a melhor 

impressao 

doUnitronAPn 



Nao existe nada mais 
pessoal do que uma impressao 
digital. Ela e unica. Ninguem 
tern igual. O mesmo acontece 
quando voce compra o seu 
UNITRON AP II na 
COMPUMICRO. 

Aqui voce tern um atendi- 
mento personalizado e exclusivo. 

O que este atendimento 
tern de exclusivo? E que na 
COMPUMICRO voce tern todas 
as informacoes do produto 
antes mesmo da compra. Ou 
seja, nossa equipe de analistas, 



PROMOCAO DE NATAL 



O MELHOR 
CONJUNTO APII. 
DRIVE ELEBRA, 
MONITOR COMPO. 
IMPRESSORA MO- 
NICA E INTERFACES. 
GRATIS MODULO 
MONIGRAF. 



CR$19 



PRECO VAUDO ATI! 20/ 12/85 




todos de nivel superior, estu- 
da o seu caso e indica-lhe a 
melhor configura^ao para as 
suas necessidades. Se voce nao 
puder vir ao nosso escritorio, 
onde sera recebido com todo 
conforto e tera a sua disposi- 
$ao um analista com todo o 
tempo disponivel para 
mostrar- Ihe o produto, nos ire- 
mos ate voce. E apos a compra 
continuamos oferecendo nossa 
assessoria, prestando-lhe assis- 
tencia tecnica, etc... 

E sabe quanto voce paga 
a mais por isso? Nada. 

Venha comprovar. 
Estamos esperando por voce. 

Pessoalmente. 




O 



INF0RMAT1CA EMPRESARIAL LTDA. 
Run Sete de Setembn >. 99 1 1 ."andar 
TeL:PBX(021) 224-7007 
CEP 20050- Rio deJaneiro-RJ 
I Av. Paulista. 726 - conj. 506- 
j CEP 01362 - Sao Paulo 
Tel..- (Oil) 288-4492 
287-6448 




Sinclair Sinclair Sinclair sine 



Hifen 



°03 



Marcel G. de Albuquerque 



Muitas vezes deparamo-nos com duvidas como: anti-infec- 
cioso ou antiinfeccioso? extraordindrio ou extra-ordinario? Foi 
para tentar resolver estas e outras duvidas que este programa, 
que ocupa 4 Kb e roda no TK-82 e similares, foi concebido, 
baseado nas Instrugoes para a Organizagdo do Vocabuldrio Or- 
togrdfico da Lingua Portuguesa, de 1943 a 1981, e no livro Or- 
tografia, Pontuagao, Crase, de Adriano da Gama Kury . 

O PROGRAMA 

Ao executd-lo, sSo pedidos o prefixo e o vocdbulo que o 
segue. Na variavel X$ 6 armazenada a ultima letra do vocibulo 
(linhas 200 e 210). A partir dai", o programa procura a regra 
em que se enquadram os elementos dados. 

Observe-se que s5o emitidas mensagens auto-explicativas 
para os prefixos "pre", "pos", "pro", "ex", "bem" e "co", os 
quais nfio tern regras "objetivas" para emprego do hifen (linhas 
220, 225, 300 e 540). 

REGRAS 

1 ? Regra: Para os prefixos incluidos na linha 230, sempre i co- 

(230) locado o hifen (M$) na linha 490. 
2 a Regra: Se o prefixo for "semi" ou terminar em "a" ou "o" 

(240) (e for igual a urn dos prefixos da linha 520), haveri 
hifen se o vocibulo comegar com a letra-vogal, "h", 
"s" ou "r" (520). Porem hi particularidades como a 
duplicacao do "s" ou "r" em cromo + soma = cro- 
mossoma, mas nao em filo + sofia = filosofia; a sub- 
rotina 880 trata disso. Ja a linha 550 cuida de pecu- 
liaridades tipo proto + organismo = protorganismo, 
micro + onda = microonda, etc. 

3 a Regra: Se o prefixo terminar em "e" ou "i" e for um dos 
(250) citados em 580, ocorre o hifen se a primeira letra do 
vocabulo for "h", "r" ou "s". A sub-rotina 880 
preocupa-se com a duplicacSo do "r" ou "s" (mini 
+ saia = minissaia). Na linha 585 sao tratados os ca- 
sos tele + escritor = telescritor, ja" sobre + excitar = 
sobreexcitar. 
4 a Regra: Se o prefixo terminar em "r", havera hifen se a pri- 
(260) meira letra do vocibulo for "h" ou "r" (600); con- 
tudo hi a excecao hiper + hepatia = hiperpatia (sub- 
rotina 630). 
5 a Regra: Para prefixos terminados em "b", hi hifen quando 
(270) seguidos de elementos comesados por "r" ou "b" 
(650). Se o vocibulo iniciar-se com "h", ocorre a su- 
pressao do "h", exemplo: sub + humano = subuma- 
no(655). 
6 a Regra: Se o prefixo terminar em "d", ocorre hifen se ha" 

(280) um "r" ou um "d" iniciando o vocabulo (670). 
7 a Regra: Para os prefixos "mal", "pan" e "circum", hi hifen 
(290) se o vocibulo comeca com letra-vogal ou "h" (690). 
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8 a Regra: Para os prefixos terminados por "s", a linha 730 cui- 
(3 10) da da supressio do "h" em casos como: des + huma- 
no = desumano. 
9 a Regra: Com os prefixos terminados em "n", normalmente 
(315) escrevem-se juntos. Como casos particulares, tem-se: 
in + habil = inibil (770). 
10 a ell a 

Regra: Os prefixos terminados em "u", "c" e "m" escre- 
(320X325) vem-se geralmente ligados ao vocabulo. 

Se o prefixo enquadrar-se em alguma destas regras, apareceri 
na tela a nova palavra formada, centralizada e com uma moldu- 
ra; caso contririo, a linha 330 emitira a mensagem prefixo nao 
cadastrado. Para se entrar com outra palavra, basta apertar 
qualquer tecla, menos N e BREAK. 

EXCEC6ES 

O programa funciona para os 125 prefixos do quadro 1 e 
deve funcionar para muitos outros. Como excecSes encontra- 
das, podemos citar: 

Hexaspermo, Hidretetrica, Macroestesia, Metasterno, Mul- 
tisciente, Pentaspermo, Perisfe'rico, Perisperma, Polisperma, 
Prot6xido, Retroesternal, Sobreestadia, Sobrelevacao, Sobres- 
sair, Sobressalto, Sotopor, Sotoposto e Termesteisa. 



A 


BIO 


EN DO 


HOMO 


NUPER 


SOBRE 


AB 


BRAQUI 


ENTRE 


IN 


OB 


SOCIO 


AO 


BRONTO 


EQUI 


INFRA 


OFTALMO 


SOTA 


AERO 


CARDIO 


ES 


INTER 


PALEO 


SOTO 


AGRO 


CATA 


El) 


INTRA 


PAN 


SUPER 


ALEM 


CIRCUM 


EX 


ISO 


PARA 


SUPRA 


ALO 


CIRCUN 


EXTRA 


JUST A 


PENTA 


TELE 


AMB1 


CIS 


FERRO 


LINGUO 


PER 


TERMO 


AN 


CLORO 


FIBRO 


MACRO 


PERI 


TETRA 


ANA 


CO 


FILO 


MAL 


PLURI 


TRANS 


ANFI 


CONTRA 


FITO 


MEDIO 


POL I 


TRI 


ANTE 


COSMO 


FONO 


MEIA 


POS 


UNI 


ANT I 


CROMO 


FOTO 


MEIO 


PRE 


VICE 


ANTROPO 


DE 


GEO 


MESO 


PRO 


VIZO 


AQUEM 


DENT I 


GRA 


META 


PROTO 


ZOO 


ARQUI 


DENTO 


GRAO 


MICRO 


PSICO 




ASTRO 


DERMO 


HEPTA 


MINI 


QUILO 




AUDIO 


DES 


HETERO 


MONO 


RADIO 




AURI 


DI 


HEXA 


MORFO 


RECEM 




AUTO 


DIA 


HIDRO 


MULTI 


SEM 




BEM 


DIS 


HIPER 


NEO 


SEMI 




BI 


ELETRO 


HIPO 


NEURO 


SOB 





Obviamente, por ser a lingua portuguesa muito rica e sur- 
preendente, muito provavelmente aparecerao novas situagdes 
n3o previstas no programa, as quais o leitor poderi acrescentar 
ao programa original. 

Observe-se tambdm que, para palavras formadas por compo- 
si?3o, tipo guarda-noturno, o programa nao funciona. 

Um outro detalhe 6 que se o prefixo terminar com uma das 
seguintes letras, "e", "i", "o", V e "u", o vocibulo que o se- 
gue deve ter no minimo tres letras. Devido a rotina de centrali- 
zaca"o e a moldura da palavra resultante, o prefixo mais o hifen 
mais o vocibulo devem ter no maximo 28 caracteres. 
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Esta e d capa do CATALOGO DO COMPUTER SHOPPING MOORE N? 03. 

O weiculo oficidl dd Moore Fornecedor Total pafd lutorrridticd Dehrutivamente TOTAL. 

Nele voce encontra mais de 400 produtos e serviqos de informattca e, a partir de agora, 

micros pessoais, perifeneos, impressoras e softwares aplicativos. 

E tudo tsso com o suporte da maior z mais bem treinad.-i Equipe de Vendas do pals, mais de 

50 Filiais de Venda, tnumeras Lojas de Informatica e a Central de Atendimento do 

Serv-Moore para dar sempre a melhor solu<;do A note esses tetefones e Ii3ue 

MOORE FORNECEDOR TOTAL PARA INFORMATICA: 
Formularies Continuos, Micro Informatica, Supnmenios e Acessorios. 



COMPUTER 

SHOPPIfslG 

MOORE 



Paid ndiores jriio"' "jue 

• h ;■ : Pauk 873 3316 

Deoir > (011)800 3316 

{nos pagamos y?u inierurbano) 




HIFEN 



BRASILTRADE CENTER 

Comercio, Industria e Participacoes S.A. 

COMPUTER SHOPPING 




Mesas 
para 

Microcomputadores 

Fabricacao prdpria • Cores discretas • Desenho moderno 



BTC-05 M 

BTC-03 M 





BTC-02 M 




Cr$ 1.049.000 



BTC-04 M 
BTC-01 



Cr$799 




EQUIPAMENTOS 



Micros das linhas: Sinclair* TRS-80* CCE« Unitron* 
Dismac • TK 2000 II • TK 85 • Exato Pro • Impressoras 
Modem • Etc. 



SUPRIMENTOS 



Perifericos • Disketes • Fitas • Drives • Placas de 
Expansao • Interfaces • Formulario Continue- • Cabos 
• Arquivos para Disketes • Etc. 



SOFTWARE 



Prosramas e Jogos variados para todas as linhas e 
marcas de Computadores 



VIDEOS 



Curso de Ingles em video cassete • Telao • Suporte 
para TV • Transcodificacao para todos os sistemas • 
Fitas: VHS - BETA-U-MATIC e para limpeza de cabeca« 
Baterias para 2 e 8 hs. • lluminadores • Cabos de 
extensao para Camaras* Bolsas para Cam aras e Videos 



Nas lojas Brasil Trade Center, vocetamb^m 
encontra video-same, cartucho com josos, 
som, telefonia, etc., das melhores marcas. 

VISITE UMADENOSSAS 

LOJAS E COMPROVE O 

QUE ANUNCIAMOS 

Matriz: Av. Epitacio Pessoa, 280 
Ipanema-RJ — Tels.: 259-1299/259-1499 

Filiais: Rua da Assembleia, 10 — Loja S-112 
Centro-RJ — Tel.: 222-5343 

Rua Silva Vale. 416 — Cavalcante-RJ 
Tels.: 592-3047/592-3098 

Rua Lopes Trovao. 134/Sala 201 
Niteroi-RJ — Tel.: 710-3659 

Rua Conde de Bonfim, 229 — Loja A 
Tijuca-RJ — Tel.: 284-2031 



SERVIQO EXPRESSO REMETEMOS PARA TODO BRASIL 



OFERTA VALIDA COM A APRESENTAQAO DESTE ANUNCIO 



1 Rr M EMPRLGO DO HI F I N 

2 REM MARCEL G DE ALBUGUER9UE 
1» SLOW 

3« LET Cl= ' ....•••••• 



EMPR 



40 LET M* = ' '" 

•ie PRINT AT 11, «■:'••• 

EGO DO HIFEN •" 

7t> PRINT AT 21. 0f "PREFIXO 7" 
B« INPUT A* 

9« PRINT AT 13,<2»-LEN A*)/2j" 
PREFIXO ■= "sA4 

103 PRINT AT 21,0»"VOCA8ULO 9 ( 
3 LETRAS NO MINIMO)" 
ne INPUT B* 

12» IF LEN B»<3 THEN GOTO 11* 
l t '5 PRINT AT 21, «|" 

130 PRINT AT 15,<2»-LEN B*>/2;" 
yOCABULO - "jB* 
180 LET A=LEN A* 

199 LET 8=LEN B* 

200 LET X*=A4(A) 
210 LET Z*=B*(1) 

220 IF A*="PRE" OR A4="P0S" OR 

A*-"PR0" THEN GOTO 470 
225 IF AS="EX" THEN GOTO 840 
230 IF A4=B* OR A*-"ALEM" OR A* 

■"AOUEM" OR A§»"RECEM" OR A4="VI 

CE" OR Al="VIZO" OR A*«"SOTA" OR 
A*="S0TO" OR A4="NUPER" OR A*=" 

SEM" OR A*= "GRA" OR A*="GRAO" OR 
CAS="MEI0" AND B4< >"AMB IENTE" > 

OR A*-"MEIA" THEN GOTO 490 
240 IF Xt="A' OR X4="0' OR A$=" 

SEMI' THEN GOTO 510 
250 IF X*="E" OR X1="I" THEN GO 

TO 570 
260 IF X4="R" THEN GOTO 600 
270 IF X*="B" THEN GOTO 650 
280 IF Xt="D" THEN GOTO 670 
290 IF A*="MAL" OR A*="PAN" OR 

A*="CIRCUM" THEN GOTO 690 
300 IF A*="BEM" THEN GOTO 710 
310 IF X*-"S" THEN GOTO 730 
315 IF X*="N" THEN GOTO 776 
320 IF X* = "li" THEN GOTO 860 
325 IF Xf»"C" OR X*="M' THEN GO 

TO 350 
330 PRINT AT 19 , 5s "PREF ! XO NAO 

CADASTRADO." 
340 GOTO 430 
360 LET T4=A*»M4+B* 



370 LEI J=LEN T* 

375 LET K=(27-J)/2 

380 PRINT AT 17,K»C1< TO J«4> 

400 PRINT TAB Kr"»":TAB (31-J)/ 
2|T*f" •" 

420 PRINT TAB KtC»< TO J+4 > 

430 FOR F=l TO 11 

440 SCROLL 

450 PRINT AT 21,31| 

460 NEXT F 

465 RUN 

470 PRINT AT 19.0|'' COM HIFEN S 
E PREFIXO ACENTIJADO." 

480 GOT 430 

490 LET HS'"-" 

500 GOTO 350 

510 GOSUB 880 

520 IF <A*="CONTRA" OR <A*="EXT 
RA" AND B*< >"ORDINARIO") OR A*=" 
INFRA" OR At="INfRA" OR A4="SUPR 
A" OR A*="ULTRA" OR A*="AUT0" OR 

A»="NEO" OR <A1«"PROTO" AND B*l 

TO 3><>"0RG"> OR A*="PSEUDO" OR 

A*-"SEMI") AND <Z*="A" OR Z*="E 
" OR Z*="I" OR Z*="0" OR Z*="U" 
OR Z»="H" OR Z4="R" OR Z*="S"> T 
HEN LET M*="-" 
530 IF A*="MEIO" THEN LET M*»" 

540 IF A*-"CO" THEN GOTO 750 

550 IF MS = "" AND B*(2X)"N" AND 

(X*=Z* OR <X*="0" AND <Z*="E" O 
R Z$ = "I") AND B*<2>»"S">> THEN L 
ET B*=B*(2 TO B> 

555 IF A*="HIPO" AND Z*="A" THE 
N LET A*-"HIP" 

560 GOTO 350 

570 GOSUB 880 

580 IF <A*="ANTE" OR A»= SOBRE" 

OR A* = "ANTI" OR A*=>"ARQUI"> AND 

<Z*»"H" OR Z*="R" OR ZS=."S"> TH 
EN LET M»="-" 

585 IF <X*="E" AND X*=Zi AND A* 
<>"S0BRE" AND A*<>"RE"> OR <A*=" 
SOBRE" AND 8*<2)="S"> THEN LET B 
*=B»(2 TO B) 

590 GOTO 350 

600 IF Z*="H" OR Z*="R" THEN LE 
T MS-"-" 

610 IF At«"HIPER" AND B*< TO 3) 
="HEP" THEN GOSUB 630 

620 GOTO 350 

630 LET BS-BX2 10 B) 



640 Lf 1 Mt - ■ 

64f, RFTIIRN 

650 IF Z»»"R" OR Z*="B THEN LE 
T M*="-" 

655 IF 7*="H' THEN LET B*=B*<2 
TO B > 

660 GOTO 350 

670 IF l% = "0■■ OR Z* = "R- THEN LE 
T »%*"-" 

680 GOTO 350 

690 IF Z*»"A" OR Z*="E" OR Z*"" 
I" OR Z4="0" OR Z*="U' OR Z*="H" 

OR (X*="M" AND ZS«"N"3 THEN LET 

M* = '-" 

695 IF Xi=Z* IHEN LET Bt=B*(2 T 
O B) 

700 GOTO 350 

710 PRINT AT 17.0:"COM HIFEN SE 

VOCABULO TEM VIDAAUTONOMA NA 
LINGUA. OU QUANDO A PRONUNCIA 
REQUER." 

'20 GOTO 430 

730 IF 7*="H" OR X*=Zi IHEN LET 

B*=B*(2 TO B> 

740 GOTO 350 

750 PRINT AT 1 9 . ; " IRREGULAR, 

NAO HA CR ITER I OS." 

760 GOTO 430 

770 IF Z*="H" THEN LET B*=B*<2 
TO B) 

780 IF CA*="CIRCUN" OR A4="IN") 

AND (Z*="E" OR Z*="I"> THEN GOS 
UB 800 

785 IF X»*Z4 IHEN LET B*=B*<2 T 
8) 

790 GOTO 350 

800 FOR 1=1 TO 3 

810 IF B4(I)»"S" THEN LET B*=B* 
U TO B) 

820 NEXT I 

830 RETURN 

840 PRINT AT 18,0l"C0M HIFEN SE 

""EX"" TEM SENTIDO DE l.'ESSAME 
NTO OU ESTADO ANTERIOR" 

850 GOTO 430 

860 GOSUB 880 

870 GOTO 350 

880 IF (Z* = "S" OR Z%= 'R ') ANO B 
*( TO 3><>"S0F" AND Bl< TO 3)<>" 
RAM" THEN LET M*=7» 

B90 RETURN 

900 SAVE "HIFEN" 

910 RUN 



Hifen 



PARA ZX SPECTRUM 



Se voce tem urn micro compati'vel com o ZX Spectrum 
(TK90X ou Timex 2068), podera usufruir deste programa. 
Basta fazer as seguintes modifica96es na listagem, elaboradas 
pelo CPD de MICRO SISTEMAS: 

1 - Substitua as linhas da listagem principal, de 70 a 110, 
pela listagem abaixo. Observe que em alguns micros, o coman- 
do SOUND equivale a BEEP. As linhas 120, 125 e 130 da lista- 
gem principal nao deverao ser digitadas. 

70 INPUT "PREFIXO ? ";A4 
80 PRINT AT 13 r (20-LEN A*>/2;" 
PREFIXO = ";A4 

90 INPUT "VOCABULO ? (3 LETRAS 
NO hINIMO) ";B% 

100 IF LEN B4<3 THEN LET B4="": 
FOR F=l TO 10: SOUND .025,. i» N 
EXT F: GOTO 90 

110 PRINT AT 15,<20-LEN B%)/2;" 
yOCABULO = ";B«6 

2 - Substitua as linhas da listagem principal, de 430 a 465, 
pela listagem abaixo: 

424 POKE 23692,12 

430 FOR F=l TO 11 

440 PRINT AT 21,31;" " 

450 NEXT F 

452 POKE 23692,2 

465 GOTO 50 

3 - N§o digite a linha 910 da listagem principal e troque a 
linha900por: 

900 SAVE "HIFEN" LINE 460 



Marcel G. Albuquerque e" Engenheiro Civil, trabalhando atualmente no 
INPD. da Universidade Federal de Alagoas. 
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DEIXE O SEU CP500 

FALAR MAIS. 

NEW BASIC 

40 novas instrucoes 



Enrique^a o vocabul»no BASIC do seu 
TRS (CPSOO 8 compativets). com 40 novas 
instrucoes dedicadas a parte g'adca que 
darao ao BASIC do seu equtpamento uma 
nova dimensao 





PRECO 12 ORTNS 



SE VOCe TEM UM CPSOO E/OU UMA P500 NAO PODE 

DEIXAR DE TER ESTE SOFTWARE 

Para os possuidores de uma impresaora 
P500 esie software permite explorar a sua 
capacidade gralica implementando uma 
tela logica de alta resolucao reconfigura- 
vel em ate 360 • 360 pontos 

GRAFICOS GERAOOS PELO NEWBASIC 
NA IMPHESSORA P500 




nirrnm 

UlDLUI i 



D istr i bu icSode Computadores 
e Servicos Ltda. 

Bu« nn»ui. 126 Cn* - Parqu« C'ut Agu*/ 

Bkl V»rm*«o - CEP 40000 - 

TEL 071-245-1294 Salvador BA 



□ 



Oeseio receoer o software NEWBASIC 
assinalado no anuncio 

Mediants envio de cheque nominal a DISCON 

DIST DE COMP E SERV LTDA 

(o porte e por nossa conta e sua encomenda 

chega mais rapldol 

Cheque. Banco 



□ Mediante pagamenio contra recebimento 
do software pelo reembolso postal, 
acrescido de despesas postais 



Nome 

Endereco 

Cidade 



CEP 



Conhega melhor os Sistemas Especialistas, um dos resultados da 
pesquisa e aplicacao das tecnicas de Inteligencia Artificial. 



Sistemas Especialistas 



Emmanuel Lopes Passos 



Sistemas Especialistas sSo progra- 
mas criados para cumprir fun- 
cdes especi'ficas em determina- 
das areas do conhecimento hu- 
mano e geralmente "simulam" num 
computador, atravds de regras de infe- 
rencia, o raciocinio e conhecimento de 
um especialista em algum dominio. Esta 
nova gerac3o de programas - que come- 
cou a evoluir a partir da de'cada de 60 - 
utiliza em grande parte tdcnicas de Inte- 
ligencia Artificial (IA), e vem despertan- 
do um interesse crescente no publico, 
uma vez que oferece a possibilidade da 
interac3o imediata, via linguagem natu- 
ral. 



COMPARACAO ENTRE PROGRAMAS EM 


INTELIGENCIA ARTIFICIAL 


PROGRAMAS CONVENCIONAIS 


- Primar iamente processamento 
simbol ico 


- Primar iamente processamento 

numer ico 


- Solucoes Heuristicas (passos da 
solucao estao implicitos) 


- Solucoes algoritmicas (passos 
da solucao explicitos) 


- Estrutura de controle usualmente 
separada do dominio do conheci- 
mento 


- Estrutura de controle e infor 
macao integrados 


- Facil de modificar e atualizar 


- Dificil de modificar 


- Algumas respostas erradas sao 
toleradas 


- Apenas sao aceitas respostas 
corretas 


- Respostas satisfatorias sao 
usualmente aceitas 


- So a melhor solucao possivel 
e aceita 



Figura 1 - Comparacdo entre os programas em I A e os convencionais. 



A revista MICRO SISTEMAS, em suas edicOes de outubro/ 
82, fevereiro/ 84, marco/84, maio/84 e maio de 85, publicou 
artigos do Prof. Antonio Costa Pereira sobre Inteligencia Arti- 
ficial e Sistemas Especialistas. Sugiro aos leitores que nao te- 
nham nenhuma formacao academica na area de Informitica 
que leiam tais artigos, pois os mesmos fornecem todo o lingua- 
jar peculiar que e" utilizado na area de IA. 

INTEUGENQA ARTIFICIAL 

Inteligencia Artificial s3o tecnicas que, utilizadas em progra- 
mas, fazem os computadores mais inteligentes. Esta tecnologia 
emergente, que vem atraindo grande publicidade, visa basica- 
mente dois objetivos: fazer maquinas e processos computacio- 
nais mais uteis e com entendimentos inteligentes. 

Os programas computacionais com os quais a LA esta" rela- 
cionada sao primariamente processos simb61icos envolvendo 
complexidade, incerteza e ambiguidade. Esses processos sao 
usualmente aqueles para os quais n3o existem solucSes algorit- 
micas, e e" necessdrio pesquisar a solucao. 

Portanto, IA trata com tipos de problemas (solucOes) que o 
ser humano encontra continuamente no mundo. 

Essa forma de solucao de problema difere daquela utilizada 
nos cilculos cientfficos e de engenharia, que s3o essencialmen- 
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te de natureza numerica e para os quais solucoes s3o conheci- 
das e produzem respostas satisfat6rias. 

No entanto, como os programas em IA tratam com palavras 
e concertos, nem sempre uma solucao correta 6 garantida. Al- 
gumas respostas erradas sao toleradas, assim como ocorre quan- 
do um ser humano resolve um problema. 

Veja na figura 1 as principais caracten'sticas dos programas 
que utilizam a IA versus os de linguagens convencionais. 

Os elementos basicos da I A sao: Pesquisas Heuristicas; Re- 
presentacao do Conhecimento; Linguagens e Ferramentas de 
IA e o Raciocinio L6gico. As suas principais aplicacOes s3o: 
Processamento de Linguagens Naturais; Visao por Computa- 
dor; Resoluc5o de Problemas e Gerador de Pianos e os Siste- 
mas Especialistas. 

Veja na figura 2 como estao distribuidos estes elementos. 

• Pesquisas Heuristicas - os primeiros trabalhos realizados 
em IA foram feitos utilizando as pesquisas heuristicas em gra- 
fos (arvores). As pesquisas heuristicas sao as estrategias para se 
tentar achar mais rapidamente a solucao de um determinado 
problema, sendo utilizadas, por exemplo, para testar teoremas 
ou resolver problemas de xadrez. 

• Representacao do Conhecimento - Pesquisadores de IA 
concluiram que procedimentos inteligentes n3o sao caracteri- 
zados tanto pelos m^todos de raciocinio quanto pelo conheci- 
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Hardware especificamente desenvolvido para aplicacoes em I A, com 
seu respectivo software bdsico (PROLOG, LISP. Smaltalk-80) , da Tek- 
tronix. 

mento armazenado. Isto porque um ser humano constr6i, du- 
rante a vida, um vasto conhecimento que Ihe permite, num de- 
terminado momento, tornar-se um especialista. 

Nota-se dai que sao necessarios metodos para "modelar" es- 
ses conhecimentos, colocando-os prontos para serem acessa- 
dos. Como resultado, vemos que a area da Representacao do 
Conhecimento e" uma das mais ativas da IA. 

• Linguagens e Ferramentas de IA - Por excelencia, as lin- 
guagens mais usadas neste campo s3o o LISP (List Processing 
Language, surgida nos EUA em 1957) e o PROLOG (PRO- 
gramming LOGic, surgida na Europa em 1972). Todas as fer- 
ramentas (software) foram desenvolvidas em LISP e PROLOG 
para expressar conhecimentos, formular sistemas especialistas 
e ajudar na programacao basica. 

• Raciocinio de Sentido Comum e L6gico - pessoal da 
area acha que o raciocinio de sentido comum e uma das coi- 
sas mais dificeis para se modelar no computador, por ser consi- 
derado raciocinio de baixo nivel, uma vez que esta diretamen- 
te ligado a aspectos subjetivos como vivencia e senso pr4tico. 
Por exemplo, a afirmacao "o leao comeu o rato" e" satisfat6ria 
para o homem e para a maquina. J3 uma afirmacao "o rato co- 
meu o leao", embora aceitavel pela maquina, 6 improvavel de 
ser aceita pelo homem. £ necessdrio ent3o repassar a miquina 
certas regras para que n3o aceite este tipo de afirmacao. Como 
representar sentido comum no computador e um assunto cha- 
ve em IA. Acha-se que num futuro muito pr6ximo esse proble- 
ma serd resolvido (serf nos computadores de 5 a geracao?). 

Uma outra area muito importante em IA e a Programacao 





^ Processamento de >, 
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L6gica, atrave*s da qua! podemos deduzir alguma coisa a partir 
de um conjunto de fatos (premissas). Programacao Logica 6 
uma area em franca expansao. 

Entre as principais areas de aplicacao da IA estao: 

• Processamento de Linguagem Natural - £ um dos maio- 
res objetivos da pesquisa em IA. Consiste em desenvolver pro- 
gramas que entendam a linguagem natural falada e escrita, vi- 
sando a interacao com maquinas por meio desta mesma lin- 
guagem (nao em linguagem computacional). 

Para um programa computacional interpretar uma comu- 
nicacao em hnguagem natural, o "conhecimento" necessario 
envolve: 

- A estrutura das senten$as 

- significado das palavras 

- A morfologia das palavras 

- As regras de conversacao, etc. 

• Visao Computacional - £ a area que estuda a possibili- 
dade de um computador ver, identificar e entender o que ele 
estiver observando, com o objetivo de localizar o que estiver 
procurando. O processamento de imagem 6 parte desse estudo. 

Os Sistemas Especialistas sao tambem uma das aplicacoes 
mais importantes. 

SISTEMAS ESPECIALISTAS 

S3o sistemas projetados para emitir uma decisao ou parecer 
sobre uma area do conhecimento humano, da mesma forma 
que um especialista. Esta decisao e apoiada em uma justificati- 
va, originada a partir de uma base de conhecimento. 

O desenvolvimento desses sistemas 6 feito principalmente 
em LISP (comunidade americana) ou PROLOG (comunidade 
europeia), admitindo-se tambem outras linguagens, desde que _ 
tenham facilidades para tal. £ 



Figura 2 - Elementos e aplicacoes da Inteligencia Artificial 
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Seu micro nao 
^pode parar 

CHAME MS: ASSISTENCIA VITAL EM MICROS 



IBM PC, RADIO SHACK, APPLE COMPUTER, 
EPSON E TOOAS AS MARCAS NACIONAIS. 

A MS trabalha desde 1971 em assistencia especializada em 
mlcrocomputacao que se estende desde check-ups preventi- 
ves ate a substituicSo de pecas, de unidades perifericas ou do 
proprio micro durante o tempo em que ele estiver em prepare 

Tenha ao seu lado a melhor assistencia tecnica em micro- 
computadores do pais. 

FACA COMO AS GRANDES EMPRESAS: 

Vang, Petrobras, Pao de Acucar, Acos Villares. Philco. etc. 

Contrato de manutengfio com a MS e garantia de bom f uncio- 
namento de seu equipamento. 

Solicite nosso representante ou f aca-nos uma visita. 



MS 



Assistencia Tecnica a Microcomputadores. 
Rua Dr. Astolfo Araujo. 521 tone: 549-9022 
Cep.: 04012 - Pq. Ibirapuera - S3o Paulo. 
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Esses sistemas sao compostos por tres partes fundamentals: 
a base do conhecimento (knowledge base), que contem toda a 
sabedoria do especialista; a base dos fatos (data-base), que con- 
tem os dados relativos ao dominio que esta sendo explorado e 
o motor de inferencia (inference system), que e o programa in- 
terpret ador. 

Veja na figura 3 os principais tipos de Sistemas Especialis- 
tas. 

ESTRUTURA DO SISTEMA IDEAL 




3ASE DE 
CONHBC1MEW1T1 



HECANIS.MO DE INFERENCIA 




• Justifies dor - Serve para dizer "como" se chegou a uma 
conclusao. 

• Interpretador - Serve para inferir describes de situacdes 
a partir de dados conhecidos. 

• Sequenciador - Garante a correta seqiiencia de execucao 
das operacoes. 

• Reforcador de Consistencia - Garante que as conclusSes 
estejam de acordo com os fatos e regras conhecidas em etapas 
anteriores. 

IMPLEMENTACAO DE SISTEMAS ESPECIALISTAS 

Os protbtipos desenvolvidos em universidades hoje sao fei- 
tos em LISP, assim como a maior parte dos sistemas america- 



CATEGOR1A 
Interpretacjao 

Predic-ao 
Diagnose 

Planning System 



APLICAQAO 



infere descrigao de situacoes atraves de 
observaijoes (analise de imagem, entendi- 
mento da fala) . 

infere conseqiiencias provavevs de situa 
c;6es dadas Ipredi^ao demograf ica ) . 

(diagnose medica ) infere sobre o mal fun- 
cionamento das f undoes (ex: sangue), irre 
gularidades, causa e efeito. 

projeto de acoes a screw tomadas para se 
chegar a urn objetivo (robo, programacao 
automat ica, problemas acoes mill tares. 



Figura 3 - Tipos de Sistemas Especialistas. 
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Evolucao dos Sistemas 
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Especialistas 



EVOLUCAO DOS SISTEMAS ESPECIALISTAS 
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►HEARSAY- 1 1 
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-HEARSAY-III 
AGE 



— EHYC1N • PUFF 

►TEIRESIAS 

H*ROSPECTOR ■ KAS 

►RITA — — ►ROSIE- 



INTERNIST 

CASNET^-*- EXPERT - 
PSG »OPS — ►OPS4- 



-OPS5- 
•R1 



SAINT ►SIN — 

■ DENDRAL • 



• MATHLAB » MACSYHA- 
■►HETA-DENDRAL 



DENDRAL (1966 - Stanford) - Sistema para andtise 
da massa espectrogrdfica-quimica. 

HEARSAY // (1980 - Carnegie Mellon University) - 
Um dos primeiros sistemas capaz de entender um discurso 
de 1000 palavras. 

^ MYCIN (1972-1976 - Stanford University) - Sistema 
Especialista que faz a diagnose e trata de infeccoes no san- 
gue; foi o primeiro projeto voltado para a area medica, e 
utitiza inferencias do tipo se ... entSo. 

TEIRESIAS (1977-1980) - Sistema Especialista que 
ajuda na construcdo da base de conhecimento (knowledge 
base). 

^ PUFF (1977 - California Medical Center) - Sistema 
Especialista que faz a diagnose de doencas pulmonares. 

PROSPECTOR (Stanford Research Institute) - Siste- 
ma Especialista que descobre depositos de minerals (fez 
uma descoberta de uma mina no valor de US$ 100 mi- 
Ihoes). 

ROSIE (1981-1982) - Sistema desenvolvido pela Rand 
Corporation para construir Sistemas Especialistas; foi ba- 
seado num primeiro prototipo diamado RITA (1976). 

PSG (1973-1976 - Carnegie Mellon University) - £ 
uma linguagem para sistemas de regras de producdo (Sis- 
temas Especialistas), para estudar e modelar o conheci- 
mento humano; gerou a serie OPS (linguagem para siste- 
mas de producdo), onde Rl representa o maior sucesso 
dessa aplicacdo. 

Rl - Eum Sistema Especialista para configurar o DEC- 
VAX. 

SAINT (1961). SIN (1967), MATHLAB, MACSYMA 
(-1971) - Sistemas Especialistas adequados a manipulacdo 
simbolica de formulas matemdticas. 

EXPERT (1979) - Linguagem para Sistemas Especia- 
listas que construiu o CASNET, um Sistema Especialista 
para a diagnose e tratamento de ghucotna. 



nos - vendidos no comercio -, que geralmente rodam em ma- 
quinas de grande porte, ou dedicadas a LISP, e tern seu preco 
entre USS 30 mil a US$ 100 mil. 

tamanho de memoria e importante: Os Sistemas Especia- 
listas necessitam colocar o conhecimento do expert na maqui- 
na (atraves de regras de producao, por exemplo) e essas regras 
consomem muito espaco. Em micros de 8 bits, pouco se pode 
fazer; ja os PC's sao ambientes mais adequados a IA e Sistemas 
Especialistas. 

Nos EUA. existem varias firmas que trabalham nessa area *, 

MICRO SISTEMAS. Dezembro/85 




MESMO NO ESCURO, 
O PROGRAMA VAI 
FICAR NA MEMORIA. 

Utilizando UNIVOLTnos 
microcomputadores de 
sua empresa, a falta de 
energia jamais 
interrompera o trabalho, 
eliminando os riscos com 
a perda da memoria. 
UNIVOLTe o gerador 
eletronico mais pratico, 
portatil e que dispensa 
instalacoes especiais. 



UNIVOLTOPAR 
PERFEITOPARA 
OS MICROS. 



REPRESENTANTES: • Sao Paulo (011) 858-4744 • Campinas (0192) 2-1575 • Rio de Janeiro 
(021) 201-7643 • Porto Alegre (0512) 22-5288 • Curitiba (041) 262-8423 • Blumenau (0473) 22-4422 

• Belo Horizonte (031) 225-6425 • Brasilia (061) 248-5359 • Goiania (062) 224-7271 
• Salvador (071) 245-7812 • Aracaju (079) 224-7776 • Macei6 (082) 221-2617 • Recife (081) 325-3189 

• Belem (091) 222-5122. 



engenharia, industria e com*rcio ltda. 

Rua Antonieta LeilSo, 110- Freguesia do - SSo Paulo 
PABX(01 1) 858-4744 -TX (01 1)32003UEIC-BR 
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PROGRAMAS PARA O TK 90-X E SINCLAIR SPECTRUM 

CIENCIA MODERNA DE COMPUTAQAO LTDA. 

Av. Rio Branco, 1S6 - Sub-Solo - Loja 1 27 - CEP 20.043 - Centre - RJ 

Teh.: (021) 262-5723 ou 240-9327 
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IFLIPIRAMA COM 2 TASULE1ROSI 24. 

ITEMTi KOUSAR O MAIOR MUMCRO DC OSJllOt 
■RIL.MAMTES NO HCHOR ESPACO DC TEMPO . 
SCM SCR PCOO PELOS SERES SUE OS PHOTC- 
TEOEM 27, 



112 SPECTRAL IMVA- 
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113 PMCN1S IIAKI 



I T I PO 1 MVADCRS I 24 

CSEHSACIOMAl OAME-DESTRUA TODOS OS M.I- 

EM10CNAS ATE CHCOAR A MAVC MAC I 24 

IDCCpLE COM O SEU CACA E DCSTRUA TODOS 

OS INIMIOOS I 27 



ITRAOICIOMA1. FLIOMT SIMULATOR EM PORTO- 
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I EM DIVERSOS AUTODROMOSi i 
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' -- l4Sr' IVOCE en PILOTO DC UM MCLICOPTEJro.CUJC 

. ODJtTIVO EM SALVAR SERES MUMAMOS- 3 

EHOCIONAMTES ETAPASI 

VOCE DIRIJt UMA MOTO EOUIPADA C/ARMA*. 
TCNTAMOO HATAR OS 1MVASORES DC UMA DCH - 

SA FLORtSTAI 27.0OO 

EMTCRRE OS POLVO* COM AS PCDRAS CVl- 

TAMDO SCR PC to I 27.000 

VEJA SC CHRMRU1 FU1IR DO LAD1R1MTO SCR 

SCR PEOO PELOS HOMTROS 27.000 

VOCE E PILOTO DC UM DOMSARDE1RO DA SC 
OUNDA OUCRRA MUMSIAL.CUJO UDJCTIVO C 

DCSTRUIR AVlOCS . DOMSAS VI ETC... I 27.0OO 

TENTE APAMMAR TODOS OS OSJCTOS PROTC- 

0IDOS PELOS MOMTROS .42 FASCSl 27.000 

VOCC TEH SUE PEMETRAR MAS MURALMAS DC 
UMA VCLMA C 1 DADC . DOM I MADA POR CHORMCS FOR 
«:<"»•.. PA4M SALVAR A VIDA DC UMA MOCIMHA. 
CM IIVCISOS M1VC1S DC DIFICULDAOCI ... .27.000 
NE*eu.HC P/APWRIAR AS PCROLAS. SCMSA- 

CIOMAL 27.000 

PCOLC TESOURO HO LASIHIMTO. EMOCIO- 

MRMTC I 27. 000 

RXSOATE OS PR1SIOHCIROS DC UMA ESTRAM- 

MA PRISAO. NARAVILHOSO. > 27.000 

PILOTS SCU CACA SOSRC RIO RAID S DCS- 
TRUA OS IHIMI0O8.I 2*.0O0 

lOOO DC TEHIS COM O MICRO. OCVCRAS SCM- 

4 AC I ONAL 2* . OOO 

HORACE SKIIMO il4Ki<ESau!E COM O MORAC10 MAS NCVCSI 27. OOO 

JCT-PAC I4RK) IRSMOMTE SCU FOSLCTC E FUJA DO PLAMS - 

TA. DIVCRSAS FASCS. MA O MIFICO 2*. OOO 

POTTV-PAI U**l (MAROUC POMTOS C FUJA DOS MOMSTROS CM 

DIVCRSAS FASCS. CMOCIOMAMTC DCMAIS... 27. OOO 

OSS.: TODOS OS PROORAMAS ACOMPAMMAO MANUAL EM POMTUOUCS. 

SOL1CITE UMA L1STA COMPLETA DC LIVROS E PROORAMAS. 
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SCUBA 01VC 

MAZIACS (4*K 

RCSOATE I4S» 

RIVIR RAID I4S4C 

MATCH POINT I40K 



DesefO receber os seguintes programas pelo(s) qualds) pagaret a quantia de Cr$_ 

N9s PROGRAMAS: 

NOME 

END".: 

CI DADE: 



UF.. 



CEP 



Para tal esiou enviando um cheque nominal a Ciencia Moderna de Computacao Ltda. enderegado a ATI, Av. Presidente Wilson. 165 
Grupo 1210 - Centro. CEP 20.030 Rio de JaneiroRJ. Despesas de Correio inclusa. 



SISTEMAS ESPECIALISTAS 



especifica de Sistemas Especialistas. Lee Hecht, Presidente de 
uma dessas companhias - a Teknowledge -, disse: "a unica 
coisa que n6s dizemos a nossos clientes e que podemos econo- 
mizar tempo e dinheiro; aumentar suas opera^oes e faze-las 
mais efetivas e eficientes". 

mercado no Brasil, contudo, ainda nab despertou para es- 
sa tecnologia. Mas brevemente podemos esperar o uso de Siste- 
mas Especialistas tambe'm aqui. 

QUE TUDO ISSO SIGNIFICA 

Oestado da arte em I A esta se movimentando rapidamente, 
com novas companhias entrando no ramo, novas aphcac^es 
surgindo e as te"cnicas existentes ate hoje sendo formalizadas. 

que se ve atualmente sao Sistemas Especialistas prolife- 
rando - centenas de protdtipos ja foram construi'dos. Alguns 
deles sao maquinas LISP (nos EUA, ]i estao construindo ma- 
quinas PROLOG) e o custo computacional ja esta" sendo redu- 
zido. Alem disso, numerosas interfaces de linguagem natural e 
sistemas de visao por computador estao no mercado. 

O Japao tern na I A sua base para os computadores de 5 a 
geracao, e suas pesquisas no momento consomem US$ 500 
milh5es num objetivo de 10 anos. 

A Inglaterra tern formado esforcos com o programa AL- 
VEY, de Tecnologia de Informatica Avan^ada, na parte de IA. 

A comunidade do Mercado Comum Europeu estabeleceu o 
programa de pesquisa ESPRIT - European Strategic Program- 
me on Research in Information Technology. 

Nos EUA, o programa de pesquisa DARPA, que inicialmen- 
te tinha urn custo de US$ 20 milhSes anuais em pesquisas de 
I A, desde 1984 se expandiu drasticamente para concorrer com 
o projeto de 5 a geracio japones. 
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Projetos & Servicos ^^IcTOl 



Sistemas 1 



Digitapao nao e mais problema 

pego enviarem pelo correio o service 

EEfsave Enlist 



[CRS 30.000] 
Programas de mteresse 



[CRS 12.000] 
MS n.°, peg. Valor 



Projeto MICRO BUG 

Sim, desejo receber 

LJ a fita MICRO BUG, com cartao de referenda, pela qual 
pagarei CRS 40.000 + CRS 7.800 pelas despesas 
do correio 

l\l.°s Atrasados 

Sim, desejo receber 

□ os exemplares de MICRO SISTEMAS (do 31 ao 39] 

pelos quais pagarei o preco unrtano de CRS 3.000. 

Para isto estou enviando cheque no valor de 
CRS a ATI Editora. 

NOME 



ENDERECO 
CEP 



TEL 



CIDADE. 



ESTADO 



ATI EDITORA LTDA 

Av.: Presidente WHson, 165/1210 - CEP 20030 
Rio de Janeiro/RJ - Tel.: [021] 262-6306 



Exercito, a Marinha e a Aerona'utica dos EUA estao todos 
empenhados em projetos de IA (a Universidade da Pensilvania 
e a Universidade do Texas sao consideradas centros de exce- 
lencia para as necessidades militares). 

Doze companhias de computacao americanas estao trabalhan- 
do para responder ao projeto japones. Elas formam, em Aus- 
tin-Texas, o MCC (Microelectronics and Computer Technolo- 
gy Corporation). 

Departamento de Defesa americano - DoD - financia 
sozinho mais de 50% das pesquisas em IA, desde 1970 ate" 
1985 (dias de hoje), com enfase em Robotica e Compreensao 
de Linguagens Naturais. 

IA NO BRASIL 

Brasil esta dando os primeiros passos em IA, apesar de 
existirem aqui pesquisadores em I A desde 1970. 

A primeira fase, formacao de massa cn'tica. comecou no 
IME em abril de 1984, com a realizacao do 1? Encontro de 
Pesquisadores em IA. Em juJho deste mesmo ano, foram ofere- 
cidos pela SBC (Sociedade Brasileira de Computacao) cursos 
introdutorios, por ocasiao do SEMISH e do SECOMU, para 
mais de 200 estudantes de graduacao em computacSo (infor- 
matica). A SBC tambem patrocinou em Porto Alegre, em outu- 
bro de 1984, o 1? Congresso de IA nas universidades. Em 
1985, este congresso foi realizado no INPE (20, 21 e 22 de no- 
vembro). 

Existem empresas que desenvolvem software em IA, como 
por exemplo a Biodata, uma software-house carioca que criou 
uma subsididria especializada para esta tarefa. A Embratel tam- 
bem tern urn grupo de IA e o SERPRO esta fazendo urn con- 
trato com o departamento de informatica da PUC-RJ, visando 
o desenvolvimento de programas em IA a serem utilizados em 
suas atividades. Ha tambem cursos que sao oferecidos pelo 
IBAM do Rio, para empresas e profissionais. 

Algumas universidades do Rio, Sao Paulo, Pernambuco, Pa- 
raiba e Rio Grande do Sul ja contam com projetos de I A (vide 

Piano Integrado de ComputacSo, coordenado pela SBC, CNPq 
e FINEP). 

O Instituto Militar de Engenharia.no Rio de Janeiro, pesqui- 
sa na drea de software basico LISP (Cobra 500), PROLOG 
(Edisa ou outro computador que tenha o microprocessador 
68000 e a linguagem C) e os Sistemas Especialistas (com enfa- 
se em Medicina, Linguagem Natural e Area Financeira). 

UM EXEMPLO BRASILEIRO 

IME ainda possui projetos na area de Inteligencia Artifi- 
cial dentro do programa de Mestrado em Informatica. 

Entre as experiencias estao o desenvolvimento de urn inter- 
pretador LISP para o Cobra 530 e de urn interpretador PRO- 
LOG, desenvolvido em linguagem C, voltado para maquinas de 
16 bits, como o Edisa 680 e os PCs nacionais. 

Uma outra experiencia foi o desenvolvimento de urn Siste- 
ma Especialista para a area financeira, feito em LISP e voltado 
para sistemas de 8 bits que utilizem o CP/M. Tal projeto pode- 
ria ter sido reproduzido num Cobra 530, por exemplo, caso o 
IME e outras institutes de pesquisa recebessem maquinas 
para pesquisa. 

Sistema Especialista construi'do no IME interpreta dados 
proyenientes de urn balanco financeiro, realizando inferencias 
(analises) sobre a situacao economica da empresa. 



Emmanuel Lopes Passos 6 Mestre em Informatica pela PUC e Doutor 
em Computacao pela COPPE/UFRJ. E autor de vdrias pesquisas em ln- 
teligincia Artificial publicadas em diversos paises. Atualmente 6 Profes- 
sor Titular e Coordenador de PdsGraduacao da Area de Informa'tica 
do IME. 



SUPRIMENTOS PARA CPD FILCRES: 



SOLUQOES NA MEDIDA EXATA DE SUAS NECESSIDADES. 





A Filcres tern sempre em estoque e para pronta entrega tudo o que 
voce precisa para o seu CPD: fitas impressoras, formulcirios, 
diskettes, e mais uma infinidade de outros acessbrios. 
E conta ainda com uma equipe de profissionais altamente 
qualificados, prontos a Ihe prestar o melhor atendimento, 
Tudo isso com a qualidade que v. exige e urn prego sempre 
compati vel com seu orgamento. 

E so telefonar e esquecer seu problema. ^ /lid/frd' 

A Filcres leva o suprimento que falta ate voce. Olj fj 

<jk 




&&»» 
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AJUDANDO A DESENVOLVER TECNOLOGIA 

Rua Aurora. 165 - SP - Tel . PBX (011)223 7388- Telex (011)31298 Direto - SP - 223-1446/ 
222 3458/220 91 13/220-7954 Direto outros Estados 222 5430/221 0326/223-7649/222 0284 




NA CLAPPY, 
CRAFT II P LUS 

Placas e acessorios para seu micro £ CRAFT"XT 



MICRO SISTEMAS avaliou, em seu CPD, a performance 
de quatro produtos que estdo no mercado. Sao eles: a placa 
Multiprint, da Microdesign; um redefinidor de caracteres; e 
dois joysticks, um analogico e outro digital, da Greika. 



Joystick 
para o Apple 




Joystick digital da Greika 
Comcrcial 



• Os applemaniacos que gostam de tirar o maxi- 
mo de proveito de seu equipamento certamente dc- 
sejam um joystick para poderem usar melhor seus 
programas, ate porque alguns softs nao podem ser 
usados sem ele. Naturalmente os usua'rios ja' tern 
conhecimento que o joystick do Apple e diferente 
dos demais, isso porque, por ser um projeto pionei- 
ro, apresenta uma leitura de sinais peculiar. Para 
tornai mais facil o conhecimento dos modelos exis- 
tentes, fizemos a analise de dois deles: um digital e 
outro anakSgico. 

O digital, fabricado pela Greika Comercial, ja 
deve ser conhecido de muitos usua'rios. Em nosso 
teste, esse modek) demonstrou ter uma boa respos- 
ta aos comandos, e seu design anatomico torna o 
ma nu so 10 menos cansativo, tendo ainda a facilida- 
de de poder ser fixado a superficies lisas atraves de 
ventosas de borracha que o acompanham. Seu lini- 
co defeito 6 nao servir para todos os softs que usam 
joystick, pois nos programas que leem o teclado 
de forma anakSgica ele se torna inutil; porem, mos- 



trou-se eficiente na maioria dos softs testados. E 
um produto de boa qualidade, apresentado em uma 
embalagcm prdpria. 

Ja o analogico, testado no CPD de MS, nao traz 
a marca do fabricante, e sua embalagem consiste 
em um envoltorio de papelao. Funcionou em todos 
os softs testados, porem a precisao dos comandos 
esta aquem do esperado, sendo que em alguns pro- 
gramas e quase impossivel dominar o joystick. O 
acabamento final do produto € de ma qualidade, 
pois com alguns minutos de uso chega a machucar 
a mao do usuario, devido ao seu formato quadra- 
do. Durante os testes, apresentou defeito de manu- 
seio, de forma que foi considerado um produto fra- 
co, cujo uso so se justifica se o soft nao aceitar ou- 
tro tipo de joystick. 

O joystick digital da Greika pode ser encontra- 
do em varios pontos do mercado, inclusive na Cicn- 
cia Moderna Computacao a 2.43 ORTN (tel.: (021) 
240-9327). Ja' o joystick analogico custa 3.43 
ORTN, na JVA (tel.: (021 ) 262-6968). 



Placa Multiprint 
para TRS-80 




Placa Multiprint, da Microdesign 



• A Microdesign Informatica criou a placa Mul- 
tiprint para resolver os problemas de acentuacao 
nos compatrveis com o TRS-80. A instalacao da 
placa. um pequeno circuito impresso de 4x5 cm, 
nao e complicada, e o manual traz varios exemplos 
e desenhos para ajudar o usuario, mas 6 neccssario 
que o instalador tenha alguns conhecimentos basi- 
cos de soldagcm para nao daniflcar seu equipamen- 
to. 

De acordo com o fabricante, a placa funciona, 
inclusive, cm alguns processadores de texto, tal 
como o Superscript (e isso realmentc acontece). 
Entretanto, o uso dos caracteres acentuados, tan- 
to nos processadores de texto quanto diretamente 
no micro, e um pouco complicado, e o usuario de- 
vera levai algum tempo ate se adaptar com as regras 
desaitas no manual, para o uso da acentuacao. O 
resultado porem e satisfatorio, uma vez que a acen- 
tuacao podera' ser vista diretamente no video. Em 
alguns casos, no entanto, fica um indeseja'vel espa- 
co cntre as palavras, como por exemplo na frase: 
"A Multiprint e a linica solucao...'*. Note que 
entre o ■"Multiprint" e o "e", e tambem entre "a" e 



"unica" existem obrigatoriamente dois espacosque 
permaneccm tanto no video quanto na impressora, 
o que pode comprometer esteticamente alguns tex- 
tos. 

Quanto ao funcionamento da acentuacao na im- 
pressora. deve-se conectar entre a saida do micro 
c a impressora um adaptador que acompanha a pla- 
ca Multiprint. Esta interface tern o formato dc um 
cartucho tipo Atari e rcgulagens para diversos tipos 
de impressora. Sua finalidade c gerar os caracteres 
acentuados c, nos testes, funcionou perfeitamente, 
reproduzindo todos os caracteres encontrados no 
video. 

Em MS n? 46, no artigo "Acentuacao nos mi- 
cros nacionais", o leitor encontrara' mais detalhes 
a respeito dessc processo. 

A conclusao final c que vale a pena instalar a 
placa, ja que ela nao interfere no funcionamento 
normal do micro e, pode inclusive ser desativada 
por um simples comando no teclado. Ha' modelos 
cspecificos para os diversos compativeis com a li- 
nha TRS-80. O preco da Multiprint e de 20 ORTN. 
Para maiores informacoes, entre em contato com a 
Microdesign - tels.: (0192) 42-9823 e 52-3477. 



Redefinidor de 
caracteres no Sinclair 




Redefinidor de caracteres 



• Com o lancamento do TK90X. muitos usua'- 
rios de micros Sinclair (compativeis com o ZX81) 
devem estar lamentando ainda mais a falta de re- 
cursos gra'ficos em seu modelo antigo. Uma forma 
de ampliar estes recursos setia dotar seu micro com 
redefinicao de caracteres, c sobre isto ja se falou 
em MS n? 37 (outubro de 84). Para os que descjam 
manter seu Sinclair e pretendem torna-lo um pouco 
melhor, fizemos a analise de uma nova placa de re- 
definicao, que o proprio usuario podera' instalar. 
O Redefinidor FHL e uma pequena placa de 
4 x 6 cm, que deve ser instalada no interior do mi- 
cro sem uso de solda ou ferramentas especiais, o 
que nao obriga o usuario a ter qualquer conheci- 
mento de eletronica. Basta seguir as instrugoes de 
um pequeno manual de instalacao e dentro de ins- 
tantes seu micro estara dotado de redefinicao, alem 
de mais 1 Kb de memoria a partir do endereco 
12288 c que fica a disposicao do usuario quando 
nao estiver usando caracteres redefinidos, sendo 



que a placa pode ser retirada posteriormente sem 
danos para o micro. 

A placa utilizada para teste em nosso CPD tinha 
um bom acabamento e conectores de qualidade, 
estava acompanhada de um manual de instalacao 
com instrucoes precisas, e ainda de uma fita com 
um jogo ja redefinido e um programa para auxiliar 
na criacao de novos caracteres. O fabricante solici- 
ta que, no pedido do redefinidor, o usuario especi- 
fique o modelo do seu micro, pois as placas sao di- 
ferentes para alguns modelos. O micro da foto e 
um TK85 com 48 Kbytes e ja' esta com a placa ins- 
talada. 

O preco do redefinidor e de 3 ORTN (sem as 
despesas postais). 

Para maiores informacoes, comunique-se com o 
fabricante peto tel.: (021) 552-0621 ou no endere- 
co: Rua Barata Ribeiro, 668/611 - CEP 22051 - 
Rio de Janeiro - RJ. 
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SOF TWARE 
EXCLUSIV0S. 
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CRAFT-XT 



PC 16 bits IBM 

compativel. Memoria 

RAM de 256 kbytes, 

expandivel ate 640 
kbytes Opera em tempo 

real. 2 drives de 5 1/4 

de 340 kbytes cada ou 
drive de 5' 1/4" de 340 



kbytes e ate 2 discos 
rigidos Winchester de 
10 Mbytes cada. Tecla- 
do de 85 teclas com 
microprocessador 
Monitor monocromatico 
de 12", com tela verde 
anti-reflexiva. 




CRAFT II PLUS 



CPU com teclado 
numerico reduzido. 
Monitor profissional 
Compo(24MHzV 
Interface e drive 5 1/4 . 
32 funcoes pre-pro- 



gramadaselOfungoes 
programaveis. S.stema 
Ivanita (geracao de 
caracteres em portu- 
gues). Conectores ba- 
nhados a ouro. 



Na Clappy, o Craft II Plus e o Craft-XT 
ainda tern 3 software exclusivos: 
o atendimento especializado, 
a assistencia tecnica perfeita e as 
melhores condigoes de pre^o 
e pagamento da cidade. 

Passe na Clappy e fa9a um teste 
sem compromisso. Voce vai ver como o 
Craft II Plus e o Craft-XT sao altamente 
compatrveis com voce. 



^ AIICROCQAIPULtDOffES LTD4. 

Clappy 

lado gente da maquina 
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MICRO SISTEMAS, Dezembro/85 



Centro: Av. Rio Branco, 88 - loja Q (galeria) 

Tels.: (021) 222-5517/222-5721 
Copacabana: Rua Pompeu Loureiro, 99 

Tels: (021) 236-7175/257-4398 

Vlslte nossas lojas ou sollclte a vlslta de um representante. 
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E deixe o computador CP 400 Color II fazer o resto. 



Agora sua unica duvida vai ser qua! programa usar. Porque o CP 400 Color II tem tnumeros 
programas em fllas, caduchos e dlsquetes para resolver tudo por voce; em casa, nos estudos e 
no trabalho. E teclado professional, que posslbllita malor agllidade e facilldade de operaQfio, 
eca e teste o CP 400 Color IL Qualidade CP. Tecnologla Prologfca. 



Conh< 

tmtmr 



c 



3) 



Caracteristtcos Ticntcas: • Teclado prollsslonal * Porta da comunlcacao RS-232, para 

tar acesso a toda a Rede Internacional de TelemdUca do Pais e llgacflo a impr essora aerial • Mem6rla total 64K • 

Sotdas para monitor e TV em cores • Permlte 2 joysticks almulianeos e analoglcoa. 



COMPUTADORBS P£ SSOAlS 



TBCNOLOGIA 
PB0U0GCA 
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SEWI3CS 



APPLE 
SOFT? 

Venha para o clube 
diferente de Apple 

"MAGIC 
WORLD 
CLUB" 

Escreva para n6s 
etenhauma 
apple surpresa. 

Caixa Postal 62521. 
CEP 01150 
Sao Paulo, SP. 




PUCLPi 



Urn CLUBE MUITO ESPECIAL 
Para usuarios dos equipamentos 
TK-85, TK90X. CP-400, CP-500 
e compativeis 




COMO ASSOCIADO DO COMPUCLUB... 

1) VOCE PASSA A RECEBER. INTEIRAMEN- 
TE GRATIS. 

- Um curso completo de BASIC. 

- Echoes mensais do COMPUCLUB 
News, com programas e dicas espe- 
ciais para o seu equipamento. 

- A cada 45 dias, programas. programas- 
li^oes do curso de graficos e dicas es- 
peciais. gravados em fila HOT LINE, a 
melhor opcao para o seu atervo de 
soils. 



2) • VOCE CANHA O DIREITO DE ADQUI- 
RIR, PELO MENOR PRECO DO MER- 
CADO, MICROS, SUPRIMENTOS E 
ACESSORIOS. 

Solicile. ainda hoje. iniorma^oes deialhadas de 
como parlicipar do COMPUCLUB e usufruir de lo- 
das essas vantagens. Nao se esqueca. porem, de in- 
dicar o tipo de micro que voce possui. 

COMPUCLUB — Cain Postal 46 (36570) Vicosa-MG 
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COMPATIVEIS TRS-aO 
COLOR COMPUTER 

COPVTHPE 

Proteja o seu patrimonio, 
fazendo "backups" dos seus 
programas gravados em fita. 
Por apenas 2,2 ORTN Ihe 
enviaremos pelos Correios, 
sem mais despesas, uma fita 
cassette com este utilitSrio. 
Faca ainda hoje o seu pedido, 
atrav^s de cheque a: 
MICROCOLOR Softcenter. 
InformStica Ltda. 
C. Postal: 2951 - RJ - 20001 




Fte@k& Pdkm 

Microcomputac§o 
e Com6rcio Ltda. 



SOFTWARE CP500/CP300 

Bancos de Dados, Processado- 
res de Textos, Compiladores Ba- 
sic, Editor/ Assembler, Comuni- 
cac3o, Didaticos, Jogos. 

SOFTWARE CP400 

PPTexto, Calc400, Editor/ As- 
sembler, Editor Griifico, Super- 
tec, Exp>ansor de tela, Comuni- 
capSo, Didaticos e muitos jogos. 
Todos os programas com exten- 
sa documentacao em portugues. 
Melhores precos e suporte per- 
manente. Solicite relacSo com- 
pleta de ambas as linhas. 



Av. Brig. Faria Lima, 1664 

Cj. 1 101 - 01452 - S3o Paulo - SP 

Fone: (01 1)813-3277 
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Dado 



I da banco d* 4*Oo% 



CURSOS 
DISPONfUEIS 



Introducoo 6 Microcomputocoo 
DOS - PC "Sistemo Operocionol " 
UNIX "Sistemo Operocionol" 
LINGUAGEM C "Ling. Progromocoo 
dDASE II "Progromocoo Cosico" 
dDASE II "Progromocao Avoncodo" 



■ dDASE III "Progromocoo Bosica" 

- LOTUS 1 -2-3 "Plan. Eletronica" 

'- Framework "Siscemo Integrado" 

- Symphony Sistemo Integrado' 

- WDrdstor "Processodor de Texto' 



Em oesenvolvimenio 



MATEWAIS DIDATICOS: Publicacoes Tecnicos desenvolvidos em 

Porr,ugues. 

RECUr^SOS DIDATICOS: Conceitos e exemplos protlcos. otraves de 

Micros e Teloo de 72 ". 

CURSOS FECHADOS E ABEIXTOS 



NOVO ENDERECO Ruo Groelondio 1 750 - Jardim Eurapo 
CEP 01434 - Sao Paulo - SP 
Telefones 861 -4599 881 4032 



ALBAMAR 

ELETRONICA ltda. 



FITAS CASSETES 
TAMANHOS 

C5 C10C15 C20 
C30 e outros 



•FITAS 

MAGNfTICAS 
1 200 e 2400 p6s 

VHS — BETAMAX 

De T5 a T120 
• DISKETTES 

5 1/4 e 8" 



Rua Conde de Leopoldina, 
270-A S8o Cristovao — R.J. 
Tels.: (021) 580-6729 
580-8276 
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REPRESENTANTES AUTORIZADOS -^iCTO! 

r Sistemas u 



Para sua maior comodidade 
a ATI Editora Ltda coloca a sua 
disposipdo os seguintes enderepos 
de seus representantes 
autorizados: 



RIO DE JANEIRO 

Av. Pres. Wilson, 165 gr. 1210 
CEP 20030 - RJ 
Tel.: (021)262-6306 

PORTO ALEGRE 

Com. Rep. Odilon Ltda. 

Rua Vol. da Patria, 323 - Cj. 309 

CEP 90000 • Tel.: (0512) 24-8200 R. 309 

NORDESTE 

Marck) Augusto das Neves Viana 
Av. Conde da Boa Vista, 1389 - terreo 
CEP 50000 Recife - Tel.: 222-6519 



SAO PAULO 

Rua Olrveira Dias. 153 

Jardim Paulista 

CEP 01433 Tel.: (0111 853-3574 



Aurora Assessoria Empresarial Ltda. 
Rua dos Andradas. 1155 - sala 1005 
CEP 90000 - Tel.: (0512) 26-0839 

BELO HORIZONTE 

Maria Fernanda G. Andrade 
Caixa Postal 1687 
Tel.: (031) 335-6645 
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ESTAMOS 
PROCURANDO 
POR VOCE 

Caso o leitor tenha desenvolvido algum programa 
ou artigo interessante, entre em contato com a 
equipe de MICRO SISTEMAS. 
Elabore um texto explicando qual a utilizacao do 
programa e junte a isso exemplos de aplicacSo. 
E imprescindivel que a listagem esteja bem 
impressa (na ausencia de impressora, use uma 
maquina de escrever). Alem destas providencias, 
6 aconselhavel que voce nos remeta uma c6pia do 
programa em cassete ou disquete, o que tornara o 
teste mais rapido. 



RIO DE JANEIRO 



SAO PAULO 



Av. Pres. Wilson, 165 gr. 1210 Rua Oliveira Dias, 153 - J. Paulista 
CEP 20030 -Tel.: (021) 262-6306 CEP 01433 Tel.: (011)853-7758 



Nesta ligao, MS traz um editor de textos. Apesar de simples, ele 
e eficiente e o ajudara na corregao de seus programas em FORTH. 



Curso de FORTH (III) 



Antonio Costa e Mauri cio Ribeiro. 



Existem dados e operates relacionados diretamente 
com a estrutura e funcionamento do computador. An- 
tes de comecar qualquer trabalho, os programadores 
experientes procuram isolar estes objetos e escrever 
palavras que os manipulem automaticamente. Com isto torna- 
se n3o so possivel pensar na programacao em termos abstratos 
como tambem escrever aplicativos que podem ser usados em 
diferentes equipamentos. A situacSo e semelhante a de um 
arquiteto que, depois de encontrar um bom mestre de obras, 
para de se preocupar com tijolos e argamassa e concentra-se 
em conceitos tais como quartos, paredes e andares (esta ana- 
logia foi tirada do livro LISP, de Winston e Horn). 

Nesta licao, apresentamos um editor de textos que podcra 
ser usado para corrigir programas em FORTH. Comecaremos 
escrevendo palavras que isolarao nosso editor das caracteristi- 
cas de uma maquina especifica. As primeiras destas palavras 
servirao para fornecer dados sobre a tela do computador. 
Entre estes dados estao o numero de linhas e o numero de 
colunas que existem em uma tela, alem da quantidade de le- 
tras. No caso das mdquinas compati'veis com o TRS-80, estas 
informacOes s3o dadas pelas seguintes constantes: 

CONSTANT PRIMEIRA-LINHA 
CONSTANT PRIMEIRA-COLUNA 
16 CONSTANT NUMERO-DE- LINHAS 
64 CONSTANT NUMERO-DE-COLUNAS 
15 CONSTANT ULTIMA-LINHA 
63 CONSTANT ULTIMA-COLUNA 
95 CONSTANT SIMBOLO-DO-CURSOR 
1024 CONSTANT LETRAS-POR-TELA 

Se a maquina nSo for TRS-80, substitua os valores das 
constantes por outros condizentes com as especificacOes de 
seu video. No caso do Sinclair, por exemplo, use 24 para o 
NUMERO-DE-LINHAS, 32 para o NUMERO-DE-COLUNAS, 
23 para a ULTIMA-LINHA, 31 para a ULTIMA-COLUNA, 
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22 para o SfMBOLO-DO-CURSOR e 768 para o numero de 
LETRAS-POR-TELA. 

Passemos agora ao teclado. Queremos que o usuirio do edi- 
tor consiga mover o cursor por todo o video. Para isto precisa- 
remos de cinco teclas de controle, a saber: 

< ENTER > - Passa o cursor para o comedo da linha se- 
guinte. Em alguns computadores esta tecla e chamada < NEW 
LINE >. codigo dela e 13 no CP-500 e 1 18 no Sinclair. 

< SETA > - As quatro setinhas servirSo para mover o 
cursor para cima, para baixo. para a esquerda e para a direita. 
codigo ASCII delas6 91, 10, 8 e 9; o codigo Sinclair e 112, 
113, 1 14 e 1 15. 

No CP-500, estas teclas sa"o reconhecidas pelas seguintes 
palavras: 

ENTER? DUP 13 = ; 
SETADIREITA DUP 9 = ; 
SETAESQUERDA DUP 8 = ; 
SETACIMADUP91 =; 
SETABA1XO DUP 10 = ; 

Caso voce esteja usando Sinclair, nSo se esqueca de substi- 
tuir os codigos de tecla dados pelos de sua mdquina. 

Alem das teclas de controle, precisaremos de duas outras: 
uma para abandonar o editor e outra para entrar no modo de 
insercao (explicaremos o que e isto mais adiante). A tecla que 
usaremos para abandonar o editor 6 chamada SAL No CP-500, 
ela sera o "e comercial", cujo c6digo e 38. No Sinclair, usare- 
mos a tecla de c6digo 136. 

A tecla que colocara o editor no modo de insercao e 
denominada EDITE. No CP-500, ela e associada a tecla 
< CLEAR >, cujo codigo e 31. No Sinclair, usaremos a tecla 
EDIT, cujo codigo e 1 1 7. Abaixo apresentamos as palavras que 
reconhecerao SAI e EDITE, no CP-500: 

: SAI DUP 38 = ; 
: EDITE DUP 31 = : 
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ENTER? DUP 13 = 



eT 
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Comportomento 
de ENTER? 



ENTER? DUP 13 = 
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f Quando 1 3 
esta na 
pilha 

Quando nao 
k 1 3 que es- 
ta na pilha 



Figura 1 

No caso do Sinclair, estas duas defini^Oes se tornam: 

: SAI DUP 136 = ; 
: EDITE DUP 117 = ; 

Vamos explicar o funcionamento da palavra ENTER?. Ela 
serve para descobrir se o codigo que esta no topo da pilha e o 
da tecla < ENTER >. A palavra "=", que aparece na definicao 
de ENTER?, verifica se dois numeros da pilha s3o iguais, e 
DUP faz uma c6pia do topo da pilha. Esta c6pia sera usada 
pelo "=". Examine a figura 1 para compreender como e execu- 
tada a serie de palavras que define ENTER?. 

A palavra "=" retira dois elementos da pilha e, se eles forem 
iguais, devolve o numero 1 . Se os elementos forem diferentes, 
e posto na pilha. Em FORTH, o 1 tern significado de verda- 
deiro e o de falso. Digjtando 65 118 =obteremos0 na pilha, 
pois e falso que 65 seja igual a 1 18. 

EDITOR 

Na listagem 1 apresentamos um editor. texto a ser edi- 
tado por ele aparecera em dois lugares: na tela e em uma regiao 
de mem6ria que denominaremos buffer. Na figura 2, o buffer 
comeca na celula cujo endereco e 3. Isto signifies que as celu- 
las de endere^os 3, 4, 5. . . pertencem a ele. 

N6s usaremos quatro buffers, cada um com o tamanho de 
uma tela. No CP-500, o buffer tera 1024 caracteres e no Sin- 
clair, 768. Caso voce esteja usando os compiladores pu'olica- 
dos em MICRO SISTEMAS, o melhor lugar para se colocar os 
buffers e abaixo do FORTH. No Sinclair, o primeiro buffer 
deve ir para o endereco 16630. Isto poderf ser conseguido 
com a declaracao 16630 CONSTANT INIBUF. No CP-500, 
esta declara9ao deve se tornar 19000 CONSTANT INIBUF. 

Agora, entre com o programa da listagem 1 . Cuidado para 
n3o cometer erros. Nao se esqueca de digitar antes todas as 
palavras discutidas ate aqui e que, para o caso do CP-500, 
v3o agrupadas na listagem 2. Se seu computador n3o possuir 
algumas das teclas escolhidas para controlar o cursor, substi- 



INICI0_ 
P0-TEXT0. 
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nasci para juntar me aos que 

amam, nao 
aos que 
odeiam. 
Antigona. 
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Figura 2 
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Listagem 1 



VARIABLE PONTEIRO 

VARIABLE INICIO-DO-TEXTO 

VARIABLE LINHA 

VARIABLE COLUNA 

: INICIO-LINHA PONTEIRO 9 NUMERO-DE-COLUNAS / 

NUMERO-DE-COLUNAS • ; 
: LETRA INICIO-DO-TEXTO 9 PONTEIRO 9 ♦ C« ; 
: POSICIONE -CURSOR LINHA 9 COLUNA © PTC i 

I MOSTRE-CURSOR POS I C IONE- CURSOR SIMBOLO-DO-CURSOR EMU 
: MOSTRE-I ETRA POS IC I ONE -CURSOR LETRA EMIT ; 
: AVANCE COLUNA 9 ULTIMA-COLUNA 1 - 

IF I COLUNA ♦' 1 PONTEIRO +< THEN : 

i ADIANTE AVANCE DROP i 
: ARMAZENE INICIO-DO-TEXTO 9 PONTEIRO 9 ♦ C 
MOSTRE-LETRA AVANF F : 
! RECUE DROP 

COLUNA 9 PRIMEIRA-COLUNA 

IF -I COLUNA »• -I PONTEIRO •' HUM ; 

: LINHA-SEBUINTE DROP 

LINHA 9 ULTIMA-LINHA ' 
IF I LINHA ♦' 

NUMERO-DE-COLUNAS PONtfclRO •' 
THEN | 
: VOLIA-LINHA PRIMEIRA-COLUNA COLUNA ' 
INICIO-LINHA PONIEIRO ' 
LINHA-SEGUINTE I 
: LINHANTERIOR DROP 

LINHA 9 PRIMEIRA-LINHA 
IF -1 LINHA ♦' 

PONTEIRO 9 NUMERO-DE-COLUNAS - PONTtll-n 
THEN i 
: MOSTRE-LINHA LINHA 9 PTC 

INICIO-LINHA INICIO-DO-TEXTO 9 + 
NUMERO-DE-COLUNAS O 

DO DUP C9 EMIT 1* LOOP DROP ; 
: MOSTRE-TEXTO O O PTC INICIO-DO-TF > I □ •- 

LETRAS-POR-TELA I - CI 
DO DUP C9 EMIT I* LOOP DROP i 
: INSERE DROP ASPACE 

NUMERO-DE-COLUNAS COLUNA 9 - 1' - DUP 
PONTEIRO 9 INICIO-DO-TEXTO 9 * * SWAP 
DO DUP I - C9 OVER C! 1 - LOOP 
C MOSTRE-LINHA O 1 

I DELETE DROP ASPACE 

PONTEIRO 9 INICIO-DO-TEXTO 9 ♦ 
NUMERO-DE-COLUNAS COLUNA 9-2-0 
DO DUP DUP 1* C9 SWAP C t* LOOP 
C MOSTRE-L INHA O j 

: INS-DEL DI'MP 

BEGIN tE» 
SETADIRF.I !A 
IF INSERE 
ELSE SETAESQUERDA 
IF DELETE 
ELSE DROP 1 
THEN THFN 
UNTIL ! 
: ED I CUES MOSTRE-LETRA 
ENTERS 

IF VOLTA-LINHA 
ELSE SETABAIXO 

IF LINHA-SEGUINTE 
ELSE SET AC IMA 

IF LINHANTERIOR 
ELSE SETADIREI IA 
IF ADIANTE 
ELSE SETAESQUERDA 
IF RECUE 
ELSE EDITE 

IF INS-DEL 
ELSE ARMAJENE 
THEN THEN THEN THEN THEN THEN : 
: LIMP INICIO-DO TEXTO 9 LETRAS-POR-TELA " 

DO ASPACE OVER C l« LOOP DROP I 
: INICIO O LINHA ! O COLUNA • O PONTEIRO ' 

15 EMIT MOSTRE-TEXTO ! 
: ED INICIO 

BEGIN MUt.lRf CURSOR KEY 

SAI IF DROP I ELSE EDICOES O THEN 
UNTIL PAGE j 

4 CONSTANT NRO-TELAS 

: ACHENDR DUP 1 IF OUESTION THEN 

DUP NRO-TELAS IF QUESTION THEN 

LETRAS-POR-TELA 1- SWAP I - • 
INIBUF ♦ INICIO-DO-TEXTO ! ] 
: EDIT ACHENDR ED 

O INICIO-DO TEXTO 9 LETRAS-POR-TELA ♦ C< I 
I LIMPA ACHENDR LIMP i 
1 FORTH ACHENDR INICIO-DO-TEXTO 9 LOAD ; 



tua-as conforme achar melhor. 

O editor e bastante primitive Apesar disso, os poucos 
recursos que ele oferece ser3o suficientes para as nossas neces- 
sidades, estando resumidos a seguir. 

Antes de entrar com um texto novo, e necessario limpar 
um buffer, eliminando lbco e textos anteriores. Isto e feito 
teclando-se n LIMPA, onde n e o numero do buffer que que- 
remos limpar (pode variar de 1 a 4). 

Apos limpar o buffer, voce pode introduzir programas 
FORTH nele, digitando n EDIT, onde n e novamente o mime- ««. 
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CURSODE FORTH (III) 



Listagem 2 



DECIMAL 

15 CONSTANT ULT IMA-L INHA 

63 CONSTANT ULTIMA-COLUNA 

16 CONSTANT NUMERO-DE-LINHAS 

64 CONSTANT NUMERO-DE-COLUNAS 
CONSTANT PRIMEIRA-L INHA 

CONSTANT PR IME IRA-COLUNA 

95 CONSTANT SIMBOLO-DO-CURSOR 

1024 CONSTANT LETRAS-POR-TELA 

19OO0 CONSTANT INIBUF 

: ENTER'' DUP 13 » i 

: SETAD1RE1TA DUP 9 = ; 

: SETAESOUERDA DUP 8 =• ; 

: SETABAIXO DUP 10 » ; 

1 SETACIMA DUP 91 « i 
: EDITE DUP 31 = ; 

: '3AI DUP 38 « i 



ro do buffer. Ao ver o cursor surgir no canto esquerdo supe- 
rior, tecle o que quiser. Voce podera mover o cursor por toda 
a tela, usando as quatro setas. 

Caso queira inserir espacos em um certo ponto da linha, 
aperte a tecla EDITE (que corresponde a < CLEAR > no 
TRS-80, e a < EDIT > no Sinclair). Isto fara o cursor sumir. 
Em seguida, comprima a seta para a direita e a linha se abrira\ 
deixando espacos no lugar onde estava o cursor. Apertando 
a seta para a esquerda, a linha se fecharsS e os caracteres serSo 
eliminados. Qualquer outra tecla que voce" apertar fara reapa- 
recer o cursor e permitird que se prossiga com a datilografia. 

Para terminar a entrada de textos, comprima a tecla SAI. Ela 
corresponde ao "e comercial" no TRS-80 (codigo 38) e ao 
quadradinho cinza nas maquinas de logica Sinclair (codigo 
136). 

Programas que voce colocou em um buffer podem ser com- 
pilados. Para isto, digite n FORTH, onde n e" o numero do 
buffer em que esta o programa. Se na"o houver erros, um OK 
serd impresso. 

Se o compilador detectar erro, digite FORGET 
< NOME >, onde < NOME > e a primeira palavra que foi de- 
finida no buffer contendo o erro. A prdtica comum e iniciar 
um buffer definindo a palavra : TASK ; . Se aparecer erro na 



Listagem 3 



HEX 
SAVE ACHENDR INIC 10- DOT IXTO 
21 5F IF Ci DUP 400 ♦ 5F20 I 
5F23 I CSAVE 2A 5F 1 F C« 
5DC9 5F20 ( 5DC I 5F23 ! . 

CREATE SYSTEM 

C3 C. 2B2 . 



compilacao, basta digitar FORGET TASK. O comando FOR- 
GET < NOME > retira do dicionario a palavra < NOME > e 
tudo que foi compilado apos ela. 

Para corrigir um buffer com erros, basta digitar n EDIT e 
realizar as modificacOes que se fizerem necessdrias. 

No Sinclair, o comando SAVE guardara, em cassete, tanto 
os buffers quanto o compilador. No CP-500, siga o seguinte 
procedimento para salvar e recuperar um buffer: 
a - Salve o buffer em cassete com n SAVE; 
b - Para ler um buffer do cassete, tecle SYSTEM, a partir 
do FORTH. Quando surgir o ponto de interrogacSo, digite F. 
Terminada a leitura, o ponto de interrogac^o surgira de novo. 
Digite "/" para voltar ao FORTH. 

Se seu computador for compatfvel com o TRS-80, entre 
com as definicOes da listagem 3. Elas lhe permitirao salvar e 
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Listagem 4 



DECIMAl 7 70 CONSTANT TELA VARIABU (NDR 
16630 CNDR $ 
IN CMIT 15 IMIT 20480 DUP LBP$ INPUT 
ASPACC TOKEN NUMBER OROP . 
CAICED TELA SWAP • ENDR € * , 
COPY CAICED SWAP CAICED 768 6 
DO OUP CC 3 PICK C» !♦ SWAP 14 SWAP 
LOOP , 
EAIXA 32 DO 8 EMIT LOOP , 
LII-IPA CALCEO OUP 768 • SWAP 
DO I C$ LOOP . 
: SALVA CALCEO 768 ♦ DP i 
LINELIST CR CR SWAP CAICED SWAP 32 • • 
OUP DUP 32 ♦ SWAP 
DO I Ct EMIT LOOP CR . 
INLINE 32 DO KEY DUP DUP 118 ■ 
IE DROP DROP 

255 DUP LEAVE 
THEN EMIT OYER C$ 1* 
LOOP CR . 
SCR DUP CAICED PAGE SWAP 30 PTC 

REVERSE REVERSE PIC INPUT CR , 

SCRLIST CALCED PAGE DUP 768 • 

SWAP DO I C( EMIT LOOP KEY DROP 
EDIT DUP SCRLIST KEY DROP 24 
REVERSE DO I DUP 29 PTC LOOP 
REVERST KEY DROP 22 PTC IN 1INFIIST 
23 PTC FAIXA 23 PTC INLINE CR , 
FORTH CAICED I0AD . 



recuperar os buffers criados com o editor da listagem 1 . 
OUTRO EDITOR 

Na listagem 4, apresentamos um editor para a linha Sinclair 
ainda mais simples do que o da listagem 1 . Ele foi desenvolvi- 
do pelo colaborador Maun'cio Ribeiro, e a seguir descrevere- 
mos como usa-lo. 

Para limpar um buffer, tecle n LIMPA, como antes. Para 
entrar com textos, digite n SCR. Em seguida, comece a datilo- 
grafia. So digite < NEW LINE > no fim. Para mudar de linha, 
ande com a tecla SPACE. 

Os programas podem ser corrigidos seguindo os passos abai- 
xo: 

a - Digite n EDIT. A tela n sera exibida. 
b - Toque no teclado. Numeros aparecerSo nas linhas. 
c — Toque no teclado. Um ponto de interroga?ao aparecer«S 
no canto inferior esquerdo. Digite o numero da linha errada. 
Ela sera exibida no pe da tela, junto com uma faixa cinza. 
d - Redigite a linha. Toda a faixa cinza deve sumir. Apague-a 
com espacos, se necessario. Na"o use RUBOUT nesta fase. A 
tecla < NEW LINE > e vista com um Z invertido. So a digite 
se ela aparecer na linha com erro. 

Para listar um buffer, tecle n SCRLIST. Para copiar o buffer 
de numero m para o de numero n, tecle m n COPY. 

CONCLUS0ES 

Nad tente entender o funcionamento dos programas apre- 
sentados nesta lic3o. Ainda e cedo para isto. Limite-se a intro- 
duzir o editor da listagem 1 em sua maquina e a aprender 
como usa-lo. Nao se esquexja de salvar uma c6pia do compila- 
dor com o editor. 



Antonio Eduardo Costa Pereira 6 formado em Engenharia Eletrdnica 
pela Escola Politecnica da USP. Fez mestrado em CiSncias Espaciais no 
Instituto de Pesquisas Espaciais. em S. J. dos Campos, e doutorado em 
Engenharia ElStrica na Cornell University, de Nova lorque. 

Maun'cio Ribeiro, autor do editor para a linha Sinclair, 6 usu&rio de 
um TK85 hi dois anos e estudante de Engenharia na UFRJ, onde cur- 
sou disciplines com aplicacSo em computacao. 
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FORMULARIOS CONTINUOS 

• DISKETTES, MINI DISKETTES 
• FORMULARIOSOFICIAIS 

* FITAS PARA IMPRESSORAS 
• FITAS MAGNETICAS 

' ETIQUETAS AUTO-COLANTES 
* ARQUIVOS PARA DISKETTES, 

• PASTAS PARA FORMULARIOS 

ATENDIMENTO IMEDIATO E PRONTA ENTREGA 

548-7137 
523-8563 



JEtj\Jj>RINT 



FORMULARIOS E REPRESENT ACOES LTDA. 

RUA ANTONIO DAS CHAGAS. 180 CEP 04714 - SAO PAULO 



SP 
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0"PACOTAO"OFERECE: 

* Micros * Software 
* Assistencia tecnica 



IBM/PC, XT e AT 
* Suprimentos 

* Acessorios 
perifericos 

CONSULTE NOSSOS PREQOS! 




Rua Luiz Go6%, 1 894 - Soo Paulo 
CEP 04043 - Telex: (Oil) 37755 DTRD 




Suprimentos Prodata 
uma boa impressao do que foi gravado 




ELEBRA — M6NICA-EMILIA 

PROLOGICAP.720 

* Cr$ 7.500 



MICRO SISTEMAS, Dezembro/85 




CENTRONICS 150/2 
DISMAC (importada) 
* Cr$ 85.000 




ELEBRA ALICE 
* Cr$ 25.050 



* Precos vi lidos at6 novembro/85 



\jp P 1 O D ULU Rua Henrique Ongan. 103 

CEP 05038 — S. Paulo — Tels.. 864-8599 (linha tronco) 

Representantes: 

Rio de Janeiro: tone • 253.3481/Belo Horizonte: tones 225.9871 e 
225.4235/ Curitiba: fones 263.3224, 262.8632 e 263.3256/ 
Porto Alegre: tones 26.6063 e 26.1319/ Recite: tone 227.2969. 



Voce escolhe seu fornecedor 

pelo prego? 

Pelo atendimento ou pelo prazo 

de entrega? 

Reuna todos os itens e 
escolha o melhor 

datamidia 

suprimentos 

• disquetes • ffitas impressoras 

• pastas •etiquetas 
• arquivos para disquetes 

• disquetes • fitas magneticas 

• formularios 



DISCOS MAGNETICOS MARCA 



CONTRpL DATA 




©♦♦♦ 



datamidia 



•SAO PAULO (01 1)572.1 118 

• RIBEIRAO PRETO (016) 625.1571 

• RIO DE JANEIRO (021) 262.9458 

1559 



PRO-m-TEC 

Tecnologia Eletrdnica Ltda. 



ASSISTENCIA 

TECNICA 
ESPECIALIZADA 



LINHAS: 

• Apple (Franklin, Basis 108. tc.) 
• IBM PC 
• Perifericos de todas as linhas 
• Outros sob consulta 
CONSULTE-NOS SEM COMPROMISSO 



Rua Cons. Furtado, 648 6° andar cj. 61 -Tel.: (011) 270-6744 -SP 



Linha APPLE 
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Linha TRS-80 



Melhore o MERGE 

Na se9ao D1CAS de MS 47 saiu 
uma listagem para simular MERGE 
no TRS 80, so que nao funcionou 
satisfatoriamente no meu CP-300. 
Fiz entao as seguintes modificacOes: 

1 . E»PLI ' • I6633>»PEEK' I6634H256-2 

?, PBINl E <Obs.« «nolc Mtt valor) 

I. Ljrrtiif prograa*. nuwro 1 

4. I PEEK! l6633>»PEEK<16634>«256-2 

B2-INME/256>«B1=E-B2»256 

6. POKE 16548. BHPOKE 16549. B2 

'. t«rrc9»r program nuarro 2 

<A. LET E* (valor inolido no ptno 2> 

9. B2-INT(E7256)tBl"E-B2»256 

1*. POKE 1654B.B1IPOKE 16549, B2 

11. LIST 

Nota: £ necessark) que o numero das li- 
nhas do programa 1 seja menor que os 
numeros das linhas do programa numero 2. 
£, tambem, necessario a no tar o valor do 
passo 2 porque ele sera apagado ao se dar 
o comando CLOAD para carregar o 1 9 
programa. 

Marcelo Baradi Spera — RS 



Linha 



TRS-COLOR 



Jogos 

Se voce quer mexer nos progra- 
mas abaixo, tente estas dicas: 

1) — Para aumentar o numero 
de vidas no programa "FROG", 
digite POKE 12002, X (onde X e 
um numero de 1 a 255). 

- EXEC 46946— lista o programa 
da memoria na tela. 

- EXEC 44759- Gera a mensa- 
gem "?SN ERROR". 

2) — Para aumentar o numero 
de naves no programa "ASTRO 
BLAST", digite POKE 6415, X (X 
= n?de 1 a 255). 

- EXEC 44658— gera a mensa- 
gem "?OM ERROR". 

- EXEC 42521- gera a mensa- 
gem "?I/0 ERROR". 

3) - Para auementar o numero 
de naves no programa "SPACE 
INVADERS" digite POKE 7674, X 
(X=n?de la 255). 

- EXEC 41 175- coloca no video 
a mensagem do COLOR BASIC. 

- EXEC 32768- coloca no vi'deo 
a mensagem do EXTENDED CO- 
LOR BASIC. 

OBS: No caso dos programas, 
carregue-os (CLOADM), digite o 
respectivo POKE e depois rode-os 
(EXEC). 



Luiz Garcia - PR 



ONERR GOTO 

Em Applesoft, o comando ONERR 
GOTO permite contornar erros quan- 
do os encontra, antes que seja coloca- 
da uma mensagem de erro, ou mesmo 
que pare a programacao. Este coman- 
do deve sei dado antes que ocorra o 
erro, de preferencia na primeira Linha 
do programa. 

Vejamos um exemplo, com o co- 
mando ONERR GOTO 200. Nesse 
caso, ao encontrar um erro, o progra- 
ma ira pular para a linha indicada no 
ONERR GOTO, que e a 200. Nessa 
linha, o programa ira" continuar nor- 
malmente, seguindo as instrucdes da 
prbpria linha, que tanto pode reini- 
ciar o programa, como terminaMo. 

A forma usual de tratar erros com 
o comando ONERR GOTO e escre- 
ver uma sub-rotina para onde o pro- 



grama \i quando ocorra um erro. No 
final dessa rotina, a declaracao RE- 
SUME causa o retorno para o ini'cio 
da declaracao onde ocorreu o erro. 
ONERR GOTO nao funciona di- 
reito em algumas circunstancias. Por 
exemplo, o Apple II trava-se se hou- 
ver um erro com o comando GET e 
se a sub-rotina de erro tiver em seu 
final a declaracao RESUME, como 
mostra o exemplo abaixo: 



1* ONERR GOIO I0« 

28 PRINt'TCREVA UM NUMERO r"l«0£ 

T A 

38 PRINT .-. 

48 END 

iee PRINT'NAO ESCREVA LETRA I " 

lie RESUME 



Neste programa, se for teclada 
uma letra em vez de numero, o pro- 
grama trava. 



Ricardo F. de Miranda — SP 



Linha TRS-80 



Oscilosgrafico 

Com esta DICA, voce tera no seu mi- 
cro um grafico diferente, ou, com algu- 
mas modificacSes, uma nova abertura 
para seus programas. 

Aloysio Soares Parades — RJ 



Linha 



SINCLAIR 



Inverte a Tela 

Esta dica inverte a tela de uma 
forma diferente da usual, substi- 
tuindo-a instantaneamente por sua 
imagem refletida, como em um es- 
pelho. Os pixels individuals dos ca- 
racteres permanecem inalterados, 
devido a forma como e mapeado o 
video e a baixa resolucao de um mi- 
cro da Linha Sinclair. 



1* CLSiPBINIS«5t.CH»»<23>-« • • 
OSCILOSGRAFICO • • •" 

z» fob «•• io isaaiMtxT » 

3» PllNTlP«INTlINPIJT"OtAU OSCIL* 
1*0 '|A 

<• p»ini i IMPUI-Itnpo (i ■ i ' 

|B 

'■• I.LS 

• » I OR '•• 10 I 

••• ro» «•• io a 

O* PB1HI TAB' l»i- . iTAB(3»|-.-|I 
Ail5t>-.-IP»INr K8KI-IJB >»« 

»• NE • I <INt«I T 

It* FOR A-» to • SIEP-I 

Ml "l«: IA»(l»)-.-|IA8C3il"."l 

IM(S8>". IPRIN1 lABlXl'Ijn .M. 



Linha SINCLAIR 



.'• K II II l» •*;■-, 4 

50 13 •« U 'E tt 't. 28 

•» II 4E r7 El l\ !* 13 

it ra ii 3i *• i» 54 id 

|] I* E» C9 



Digite agora esse programa, em 
BASIC, que demonstra o funciona- 
mento da sub-rotina e de RUN: 

5 IO» «-l 10 !.■ 

I* Pilar -■ tCTI em im HS'I Do liMIH • 

.» -.1 ■' • 

31 IAHD USI 16514 

Se ao inves de letras colocarmos 
determinados desenhos em modo 
graTico, em LOOP, teremos a ilu- 
sSo de movimento tridimensional. 



Eduardo Mirabelli A. de Medeiros - SP 



TK2000 



Malha Eletronica 

Esta dica gera uma combinacao 
de padrOes coloridos ate a conclu- 
sSo do efeito final, ou seja, um 
efeito de malha multicolorida: 



!• HUM! 

.'8 VIAE) 61HIAB l2iINVLhSE:PRlNI 
MAI HI, I LE IRONICA'sNOKMAL :VTAB 9: 
MIAU 1IISPR1N7 'POR'IWTAB liMHAl' 
n:m INI JORGE PABLO ZAPATA KK'lfc 

: .' I All 28:H1AB 9:PRINT' < APEh IE 
OIIAlQlh-H ILClAi'iOF' At 

M) HOR 

48 I OR C'l 10 1 

'.,8 HLOLOR-L 

48 FOP A»l TO 191 STEP I 

•P MI'I .11 .->B.A 10 1 A 

iv iouno A4ic ?>*te.c ■'•;•* 

<• nl*t a 
i '••< m x i l 

111* Li I t : I L « 1 



Jorge Pablo Zapata Rivera - BA 



Linha TRS-COLOR 



POKEs no Color 

Entre com estes POKEs e 
aproveite melhor o seu Color: 

I'OPI 184.8»PnKF I8"..eti I "AIj 

Chama um programa em BASIC 
sem apagar a tela. 

pokf 393, * 

X = seleciona a velocidade da 
resposta do teclado. 

POKE 35V. 68 

Diminui a velocidade dos carac- 
teres escritos na tela. Para voltar 
ao normal digite POKE 359, 126. 

POKE 159,, -".5 



In 




Desliga todas as teclas. 
Para voltar ao normal digi- 
te POKE 359, 126. 



I'OKi ir,9.1,?8 



Converte caracteres "STRING" 
em caracteres "GRAFICOS". Para 
voltar ao normal digite POKE 
359,126. 

POKE 359. l2((,ip0KE 3-e 16^=P0KE ' 
61,133 

Os caracteres s3o dobrados na te- 
la. Para voltar ao normal, digite 
POKE 359, 57. 

i 'I i 1453V 

Simula9ffo da linha: 10 AS = IN- 
KEY$ :IFA$ =""THEN 10. 

POKE 179.X 

Efeito especial do PCLS de acor- 
do com o valor dado a "X". 



Efeito especial do PAINT, CO- 
LOR, etc. de acordo com o valor 
dado a "X". 

Frank Costa B. Hudson - MG 
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Linha TRS-COLOR 
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Envie suas dicas para a Redacao de 
MICRO SI STEM AS na Av. Presidente 
Wilson, 165 - grupo 1210. Centra, Rio de 
Janeiro, RJ. CEP 20030 



Beep no teclado 

Rode o programa abaixo e con- 
seguira um teclado sonoro no seu 
Color. O programa foi testado em 
um CP-400 e funcionou perfeita- 
mente. 

Antonio Lopes Neto - SP 



io clS'QosuB hb 

,'• (LEAP .'W0.MI-43 

ll» ilOSIIH flpliT^HI 43 

4» FOR « SI IO HUREAD 0P4IN-0AL 

I «H'«clP»i 

■ NtPOKE «. NINE XT 
ft* IF S04992 HUN ppinT TABiB)" 

DA1A ERROR :'.<>UND l».ie:^T0P 
/• f XEI El >NEH 

tie HI«PEEK( HA)»L'5A*PEf « ' 11/' IRE 
TURN 
'9 |>AI A ie.HO.ee. 16.RF .ill .68. 3* 

tee DAiAHD.ee.et.9F ,90.39.CC,ec, 
i i.i D.ei 

l l* OATAftB. te.HI .FV.VF.VD.39.34. 

(A . I I , »t> 

12« DAI Ae4.l)0.H0.5B.L" . HI .BD.A9. 

'.'..3'. 

I.» (IAIA..A. 'E,SC.F1 



Armazenamento 
de imagens 

Eis uma forma de armazenar 
qualquer imagem em uma varia- 
vel, dentro da questa"o lan?ada 
no artigo "Riscos, Rabiscos e Cria- 
tividade"(MSn?27). 

1* FAST 

2D REM IMAGEM EXEMPLO 

3# FOR A-l TO /•« 

4« PRlNT'X'j 

58 NEXT A 

68 PAUSE 4E4 

•"8 POKE 16437.255 

188 LET *%=■■" 

118 LET Z-PEEK 16396«?5&»PEEK 1639 

7*1 

128 FOR J=Z TO Z*724 

138 IF PEEK J«11B THEN LET J»JM 

148 LET X»=X$«CHR4 PEEK J 

158 NEXT J 

Apos a execu9ao, este progra- 
ma pode ser deletado (sem usar 
NEW). Para testa-lo, digite PRINT 
X$ e veja na tela o desenho que 
foi armazenado na variavel X$. 
N3o use CLEAR, RUN ou NEW 
para que a variavel permane^a na 
memoria. 




Linha TRS-80 


Som/BAS 

Este programa coloca na RAM 
uma rotina em linguagem de maqui- 
na que produz um som de freqiien- 
cia F e dura?2o D, na formula: 

WW=USR(D • 256 + 255 - F) 

A rotina fica a partir do endere- 
50 FFOOH. Se voce tiver menos de 
48 Kb, mude os valores dos endere- 
90s nas linhas 10 e 20. 

Voce pode usar este programa 
no inicio de outros, para chamar a 
rotina com USR, cada vez que for 
necessdrio. 

18 POKE .6561 .2S5:F0Kt 16562.254 
:IF PEEK' 1639A)>281 IMEN POKE 16 
526.9:P0KE 1652'. 255 ELSE DEFUSR 
--256 

/e f or x=~?r,6 'o , , ; , aiR£AO tipok 

E X.YINEXT 

38 OAIA285. 12/, 18.62. 1 . 14.8.237. 

91 .61 .64.69. 4 7.238.3, 179 211 .255 

. 13.48. 4. 16.246. 24.242. 37,32,241 

.281 


Gino Raniero M. Lozada — RJ 




Eduardo Ribeiro Poyart — RJ 
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INKEY$ - Enderegamento 
do cursor 

Na linha 60, simulamos um INKEYS 
atraves do endere^o 283, que indica a 
tecla que foi ou esta sendo pressionada. 
Para usa-lo como INKEYS, devemos 
zerar o seu conteudo antes da leitura 
pelo PEEK, assim a "sujeira" da ultima 
tecla pressionada desaparece. 

Na linha 1 00, temos uma sub-rotina 
que endere^a diretamente o cursor atra- 
ves das variaveis L (linha) e C (coluna). 
Para uma maior velocidade na execucSo 
do programa, convem coloca-la no ini- 
cio. 

18 HOME 

26 INPUT"LINHA. COLUNA .1 i IHOMI 

38 IJOSUB 188 

48 PRINT'MC18«» : 

58 POKE 283. 8 

68 IF PEf I (283) < >ASr < "I ' nil N l 



e 

78 liOTO 1* 

188 PR1NI LHKt<,'''< ;IIIR«ji61 

>L ) |CHR«< ( • i ' > : :R1 InRN 



Edmundo T. Donato Junior — AL 
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Conversor 

Esta dica converte decimal em 
hexa e vice -versa. 



,*»«> LI I Ml< 1888U Lb: T»l 
',818 A*- 81234567B9ABCDEF 
5828 INHII LNIkAOA DlfllMAL Oil 
'H >f XADEI IMAI iMi 

.8 18 II n* H THrn 5898 ELSE CL 

'.848 INI'LII nihil O NIIHI RO FM DEI I 
MAI :N:[ I Ml'RlNl J*- IB.N: ■' 

858 ' -N l.:Nii'=i» 1NI(X1>»14»1 
:N IN! . 

.868 II M'lS IMEN r*V*1'80T4) 58?. 
8 n '-E NIY«1 "HH 
•.878 FOR l^l 10 T- 1 :Nt = MIDt'A*.N 

' I i , I i«N»!NI «I-I'R INI J548.N* 

■•*- PRINIWIU8. 0IJIHA IRANSIOKMA 

i A'- • (S/N) 

•j8H8 M*'INKI,t:l( Mt= IHEN 588 

8 1LSE IF nl' S" IMIN '888 El SI 
I NO 

■ r-"» LLb:|NPIi: OHAI O NUMERO th 
Ml ■(•DEL I MAI :N*:PR INI J'. I8.N* : 

• i ,'.• I OR 1^1 tfl 1 8. : :f Mi hKNl I . 
1 i nil'tlAV, I I I IHEN 51 '8 II i Nl 

■ I 

V 118 HO tO M '8 

m.'8 N(T>«nt»t»nO'>T0 ".iee 

.138 FOI. 1 = 1 10 r-t*N*N*iN'I)-ll 

■ 1AC«Y-1 I HNF«1:PRINI J53B.N :!.•■■ I 

'1 ',8 '5 



Mervyn de Oliveira — MG 










HABERKORN. E., O 
Computador na AdmmistracSo 
de Empresas, Editors Atlas. 

Em Computador na Admi- 
nistragSo de Empresas, o autor 
procura mostrar de forma bastan- 
te clara a utilizacao dos recursos 
da informatica, visando desmisti- 
ficar o uso do computador. li- 
vro apresenta tecnicas de como 
e onde estes recursos devem ser 
aplicados e o que as empresas 
precisam fazer para alcancar auto- 
macao total dos seus procedimen- 
tos administrativos. 



FREEDMAN, A., dBase II para 
principiantes; BYERS R. A., 
dBase 1 1 Aplicacdes Comerciais/ 
dBase/I I; Editora McGraw-Hill. 

A MacGraw-Hill esta lancan- 
do, em conjunto com a Datalo- 
gica (rep resent ante do Grupo 
Ashton-Tate, no Brasil) maisuma 
lerie de Irvros. Desde ja, destacam- 
se os tftulos sob re os gerenciado- 
res de dados dBase II e III. Em 
dBase II para principiantes sab 
abordados temas ma is simples, 
como o que sa~o sistemas de ge- 
renciamento de dados; as carac- 
t erf stic as e capacidades do dBase 



d ISA SI II 



HinOIB DMDMI 




II; como mstalar, testar e traba- 
Ihar com o dBase II e o planeja- 
mento de um banco de dados, 
chegando ate a algumas nocoes 
sobre a construca"o de um progra- 
ma em dBase. 

No livro sobre aplicacdes co- 
merciais sa*o apresentados os fun- 
damentos do dBase II, mas o 
autor explora principalmente te- 
mas como o sistema de contabili- 
dade; lista e etiquetas; tecnicas 



de insercao de dados e depura- 
cao de erros e efeitos especiais. 

Em dBase III, o autor amplia 
as possibil idades de uso de um 
banco de dados, levando em con- 
sideracao diversos tipos de aplica- 
coes. Dentre os capi'tulos, estao: 
formas simples de utilizacao de 
um banco de dados — seu fun- 
cionamento; planejamento, cons- 
trucao, modificacao e manuten- 
gao de um banco de dados e rela- 
t6rios especiais. 



SILVEIRA, M., Explorando o 
TK90X, Editora Aleph. 

O objetivo deste livro e dar 
informacdes adicionais ao usuario, 
ou seja, ir alem do que consta no 
manual do TK90X. Para isto, em 
grande parte dos programas foram 
utilizados recursos que na*o sao 
abordados de maneira completa 
no manual (ou asvezesignorados), 
o que da ao usuario a chance de 
conhecer melhor seu equipamen- 
to. 

Entre os programas do livro 
estdo: Ensinando a subtrair; Brin- 
cando de desenhar; TK hora; 
Esquiando no video e Saindo do 
BASIC. 



PASSOS, E. L. f Micro-Mini 
Computadores Brasileiros, Editora 
Campus. 

Este livro fornece ao leitor fer- 
ramentas para auxilia-lo na com- 
paracao dos varios minis e micro- 
computadores existentes no mer- 
cado brasileiro. Alem das informa- 
pSes basicas, e o primeiro livro a 
apresentar um m^todo, para que o 
leitor faca a sua propria analise e 
escolha o equipamento mais ade- 
quado as suas necessidades. 



ENDEREQO DAS EOITORAS 

• Aleph Editora — Av. Brigadei- 
ro Faria Lima, V451, conjunto 31, 
CEP 01451, tel.: (011) 813-4555, 
Sao Paulo; 

• Editora Atlas — Rua Conse- 
Iheiro Nebias, 1384, CEP 01203, 
tel: (011) 221-9144, Campos Eli- 
sios, Sao Paulo; 

• Editora Campus — Rua Barao 
de Itapagipe, 55, CEP 20261, 
tel.: (021) 284-8443, Rio de Ja- 
neiro; 

• Editora McGraw-Hill — Rua 
Tabapua, 1105, CEP 04533, tel.: 
(011) 280-6622, Itaim Bibi, Sao 
Paulo. 




Faz a Folha de Pagamento de sua empresa. 
emitindo relator ios como Guia de I A PAS, 
Guia de FGTS. Relacao de Empregados. 
Relacao para I.R., Relacao para Banco. 
Informe de Rendimentos, Acumulados 
Anuuis. RAIS e Recibo de Pagamento. 
A folha pode ser semanal ou mensal. 
As tabelas sao modificadas pelo propria 
usuario. 

Permite tambem. adiantamentos de saldrio, 
reajuste salarial. alteracoes de acumulados e 
outras funcdes que agilizem o processarnento 
da Folha de Pagamento da empresa. 



A Contabilidade de um mes em 2 Moras! 
Esie Sistema permite o cadastramento de 
historicos padronizados e de piano de contas 
com ate 5 niveis. 

Emite Didrio. Razao. Balancete. Balanco, 
Demonstracao de Resultados. Demonstracdo 
de Lucros e Prejuizos acumulados. Uslagem 
par centro de custo e extralo de comas, entre 
ouiras funcoes. 



Controla o estoque de itens com 

Especificacdo. Estoque Minimo. Vnidade. 

Fomecedor. Localizacao e outras 

informacdes relacionadas no item como 

Custo Medio, Entrpdas e Saidas no periodo, 

etc. 

Fornece Listagens Geral e Partial dos 

produtos. Uslagem Fisico- Financeira. 

Listagem dos produtos abaixo do estoque 

minimo. Lista de Precos e Etiquetas, entre 

ouiras. 

Admite tambem. Reajuste de Precos. 

Alteracao de Dados e Exclusao de Produtos. 



Compativeis com as linhas TR5-80 e Apple. 



Qnci/Qjon 



Av. Rio Branco, 45 - sala 1.311 
« ■ /l/ie(DQ/ Rio de Janeiro - ( EP 20. 090 

Um jeito fdcil de resolver Tels. : (02 1) 263- 1241 e 233-0613 
os problemas de seu computador. 



A NASA JON oferece a voce e a sua empresa assistencia lecnica total, 
garantia permanente e mantem a sua disposicSo programadores 
e analistas para desenvolver sistemas especificos sob encomenda. 
Conte com a NASAJON SISTEMAS. 




TERMINAIS RACIMEC 

EM AUTOMAQAO COMERCIAL: 
DA CAIXA REGISTRADORA AO TERMINAL PDV. 



Os produtos RACIMEC para aplicacoes 
comerciais foram desenvoJvidos com 
base em extensa pesquisa junto aos 
usuarios. resuttando em solucoes 
realistrcamervte ajustadas as condicoes 
brasileiras e adequadas a diversos 
modos de operacao. Os equipamenios 
RACIMEC- 1300 para uso nos diversos 
seomefflQS do comercio ercontram 
aplicacdes como: 

■ caixa regisfradofa efetrontca, off-line, 
stand-alone; 

• caixa inteligente off-line, com capture 
ou dados em meio magnetico; 

• caixa-tefmM com comunicacoes. 
on-line a concentradores; 

• terminal on-line de ponto-de-venda; 

• terminal on-fine para desenvolvimento 
proprio de programas do usuario. 



Tres importantes caracter isticas sao 
noladas nesta linna ae produtos: 
■ o equipamento basrco e sempre o 
mesmo. varrando modulos configurdveis 
e programas, migrando para cima" 
ou "para baixo" entre os varios modos. 
perniitindo padronizacao de operacoes: 
* os terminals sao extremamente 
ffexiveis, aceitando uma serie de 
penfeVicos: leitora optica para earners 
de crediano ou etiquetas de mercadoria, 
gravador de cartucr>os de fita magnetica , 
bafanca efetronica, display para cliente, 
fee I a do para cliente, leitor de cartao 
magneti/ado, leitor de cod igo de barf as , 
gaveta de dinheiro, bateria de 
alimentagao de emergencia, etc. 
- os equipamentos podem ser 
programados peta fabrica ou pelo 



prOpno cliente, em linguagem 
parametrizada e em linguagem de alto 
nlvel, por qualquer micro. 
Os programas podem ser multiplicados 
e remetidos em cassetes. RACIMEC 
oferece tambem sua completa linha de 
microcomputadores, multiplexadores e 
per if err cos, que, associada aos terminals 
caixa, apresenta a melhor relacao 
custo/performance de todo o mercacfa 
em ambientes de automagao comercial. 



K 



RACIMEC 



RACIONALIZACAO E MECAMZACAO 



: 



Matriz e Fabrica - Estrada dos Bandeiranr.es 10 710 • Jacarepagua - Tel.: (021) 342-8484 - Telex (021) 22618 RRME BR 

Regional Rio - R Barata Ribeiro 370 - sala 307 - Tel ; (021 ) 235-1561 - Telex (021) 35056 RRME BR 

Regional Sao Paulo - Av. Paulista 1 .471 - conis. de 1 1 14 ate 1 1 17 ' - Tels.: (011) 284-2808 / 283-0777/ 283-0969/284-8472 

CEP 0131 1 <■ Cx. Postal 55051 - Telex (01 1 ) 25920 RRME BR 



AMicrodigita 

lanca no Brasii 

o micro pessoal 

demaiorsucesso 

no munda 



A panir de agora a histona dos 
micros pessoais vai ser coma da em duas 
partes: antes e depois do TK 90X. 

TK 90X e, simplesmente, o unico 
micro pessoal lancado no Brasii que 
merece a classificacao de "software 
machine": urn caso raro de micro que 
pela sua facilidade de uso. grandes 



recursos e preco acessivel recebeu a 
atervcao dos criadores de programas e 
penfericos em rodo o mundo. 

Para voce ter uma ideia. existem 
mais de 2 mil programas, 70 
livros, 30 pentencos e inumerasj 




revistas de usuartos disponiveis para ele 

intemacmrialmente. 

E aqui o TK SOX ia sai com mais de 
100 programas, enquarsto outros estao 
em (ase final de desenvolvimento para 
Ihe dar mais opcoes para trabalhar, 
aprender ou se divertir que com qualquer 
outro micro. 

TK 90X tern duas versoes de 
memoria Ide IB ou 48 Kl, imagem de 
alta resolucao graTo com 8 cores, 
carregamemo rapido de programas 
(controlavel pelo prbpno monitor], som 
pela TV, letras maiiisculas e minusculas 
e ainda uma exclusMdade: acentuacao 
em portugues. 

Faca o seu programa: peca ia uma 
demonstracao do novo TK 90X. 

A1ICRODIGI14L 



Chegou o micro 
cheio de programas. 




